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

zsh-workers/10144

Browse source
This commit is contained in:
Tanaka Akira 2000-03-15 09:39:05 +00:00
parent 05eb5d93b1
commit 2bb32164c7
6 changed files with 240 additions and 67 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Src/exec.c
View file

@ -3184,7 +3184,7 @@ execautofn(Estate state, int do_exec)
if (prog->alloc == EA_MAP)
shf->funcdef = stripkshdef(prog, shf->nam);
else
shf->funcdef = zdupeprog(stripkshdef(prog, shf->nam));
shf->funcdef = dupeprog(stripkshdef(prog, shf->nam), 0);
shf->flags &= ~PM_UNDEFINED;
}
popheap();
@ -3217,7 +3217,7 @@ loadautofn(Shfunc shf)
if (prog->alloc == EA_MAP)
shf->funcdef = stripkshdef(prog, shf->nam);
else
shf->funcdef = zdupeprog(stripkshdef(prog, shf->nam));
shf->funcdef = dupeprog(stripkshdef(prog, shf->nam), 0);
shf->flags &= ~PM_UNDEFINED;
popheap();
@ -3359,7 +3359,7 @@ runshfunc(Eprog prog, FuncWrap wrap, char *name)
* list of its contents. */
/**/
static Eprog
Eprog
getfpfunc(char *s)
{
char **pp, buf[PATH_MAX];