nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

bug: syntax `local function' does not increment stack size

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2003-09-29 13:41:35 -03:00
parent 6063c5c61f
commit 5d4bf35ec9
2 changed files with 62 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
lparser.c
View File

@@ -1,5 +1,5 @@
/*
** $Id: lparser.c,v 1.217 2003/08/27 21:01:44 roberto Exp roberto $
** $Id: lparser.c,v 1.218 2003/09/05 14:00:27 roberto Exp roberto $
** Lua Parser
** See Copyright Notice in lua.h
*/
@@ -1167,11 +1167,13 @@ static void ifstat (LexState *ls, int line) {
static void localfunc (LexState *ls) {
expdesc v, b;
FuncState *fs = ls->fs;
new_localvar(ls, str_checkname(ls), 0);
init_exp(&v, VLOCAL, ls->fs->freereg++);
init_exp(&v, VLOCAL, fs->freereg);
luaK_reserveregs(fs, 1);
adjustlocalvars(ls, 1);
body(ls, &b, 0, ls->linenumber);
luaK_storevar(ls->fs, &v, &b);
luaK_storevar(fs, &v, &b);
}
@@ -1346,7 +1348,8 @@ static void chunk (LexState *ls) {
while (!islast && !block_follow(ls->t.token)) {
islast = statement(ls);
testnext(ls, ';');
lua_assert(ls->fs->freereg >= ls->fs->nactvar);
lua_assert(ls->fs->f->maxstacksize >= ls->fs->freereg &&
ls->fs->freereg >= ls->fs->nactvar);
ls->fs->freereg = ls->fs->nactvar; /* free registers */
}
leavelevel(ls);