JehanneOS/mksh
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

enable passing of a hint how many pointers we’ll need to anew()

Browse Source 
if 0, the default is used
This commit is contained in:
tg
2008-11-15 07:35:25 +00:00
parent 03acb8ce51
commit 32e1ecf5b3
6 changed files with 23 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
main.c
View File

@ -13,7 +13,7 @@
#include <locale.h>
#endif
__RCSID("$MirOS: src/bin/mksh/main.c,v 1.110 2008/11/12 04:55:18 tg Exp $");
__RCSID("$MirOS: src/bin/mksh/main.c,v 1.111 2008/11/15 07:35:24 tg Exp $");
extern char **environ;
@ -91,11 +91,11 @@ main(int argc, const char *argv[])
}
kshname = *argv;
APERM = anew(); /* initialise permanent Area */
APERM = anew(0); /* initialise permanent Area */
/* set up base environment */
env.type = E_NONE;
env.areap = anew();
env.areap = anew(0);
newblock(); /* set up global l->vars and l->funs */
/* Do this first so output routines (eg, errorf, shellf) can work */
@ -614,7 +614,7 @@ newenv(int type)
ep = alloc(1, sizeof (struct env), ATEMP);
ep->type = type;
ep->flags = 0;
ep->areap = anew();
ep->areap = anew(0);
ep->loc = e->loc;
ep->savefd = NULL;
ep->oenv = e;
@ -720,7 +720,7 @@ reclaim(bool finish)
e->temps = NULL;
adelete(&e->areap);
if (!finish)
e->areap = anew();
e->areap = anew(0);
}
static void