diff options
Diffstat (limited to 'lparser.c')
-rw-r--r-- | lparser.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lparser.c,v 1.122 2001/01/10 16:40:56 roberto Exp roberto $ | 2 | ** $Id: lparser.c,v 1.123 2001/01/10 17:41:50 roberto Exp roberto $ |
3 | ** LL(1) Parser and code generator for Lua | 3 | ** LL(1) Parser and code generator for Lua |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -335,7 +335,7 @@ static void close_func (LexState *ls) { | |||
335 | lua_State *L = ls->L; | 335 | lua_State *L = ls->L; |
336 | FuncState *fs = ls->fs; | 336 | FuncState *fs = ls->fs; |
337 | Proto *f = fs->f; | 337 | Proto *f = fs->f; |
338 | luaK_code0(fs, OP_END); | 338 | luaK_code1(fs, OP_RETURN, ls->fs->nactloc); /* final return */ |
339 | luaK_getlabel(fs); /* close eventual list of pending jumps */ | 339 | luaK_getlabel(fs); /* close eventual list of pending jumps */ |
340 | removelocalvars(ls, fs->nactloc); | 340 | removelocalvars(ls, fs->nactloc); |
341 | luaM_reallocvector(L, f->code, f->sizecode, fs->pc, Instruction); | 341 | luaM_reallocvector(L, f->code, f->sizecode, fs->pc, Instruction); |