mirrors/zsh
1
0
Fork 0
mirror of git://git.code.sf.net/p/zsh/code synced 2025-10-26 16:40:29 +01:00
Code Releases Activity

zsh-workers/9079

Browse source
This commit is contained in:
Tanaka Akira 1999-12-16 14:04:16 +00:00
parent 990818d029
commit 3c93bfe162
2 changed files with 23 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

13
Src/exec.c
View file

@ -2905,6 +2905,8 @@ execautofn(Cmd cmd, LinkList args, int flags)
int noalias = noaliases;
List l;
pushheap();
noaliases = (shf->flags & PM_UNALIASED);
l = getfpfunc(shf->nam);
noaliases = noalias;
@ -2929,6 +2931,8 @@ execautofn(Cmd cmd, LinkList args, int flags)
} LASTALLOC;
shf->flags &= ~PM_UNDEFINED;
}
popheap();
execlist(shf->funcdef, 1, 0);
return lastval;
}
@ -2942,6 +2946,8 @@ loadautofn(Shfunc shf)
int noalias = noaliases;
List l;
pushheap();
noaliases = (shf->flags & PM_UNALIASED);
l = getfpfunc(shf->nam);
noaliases = noalias;
@ -2955,6 +2961,8 @@ loadautofn(Shfunc shf)
} LASTALLOC;
shf->flags &= ~PM_UNDEFINED;
popheap();
return 0;
}
@ -3118,9 +3126,14 @@ getfpfunc(char *s)
HEAPALLOC {
r = parse_string(d, 1);
} LASTALLOC;
zfree(d, len + 1);
return r;
} else
close(fd);
zfree(d, len + 1);
} else {
close(fd);
}