rusefi
/
lua
mirror of https://github.com/rusefi/lua.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

small bug

This commit is contained in:
Roberto Ierusalimschy 2005-02-18 10:50:08 -02:00
parent 7d45a5f48f
commit d84cc9d2db
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lvm.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: lvm.c,v 2.23 2005/01/10 18:33:37 roberto Exp roberto $ ** $Id: lvm.c,v 2.24 2005/02/18 12:40:02 roberto Exp roberto $
** Lua virtual machine ** Lua virtual machine
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -620,9 +620,9 @@ StkId luaV_execute (lua_State *L, int nexeccalls) {
int aux; int aux;
StkId func = ci->func; StkId func = ci->func;
StkId pfunc = (ci+1)->func; /* previous function index */ StkId pfunc = (ci+1)->func; /* previous function index */
if (L->openupval) luaF_close(L, base);
base = ci->base = ci->func + ((ci+1)->base - pfunc); base = ci->base = ci->func + ((ci+1)->base - pfunc);
L->base = base; L->base = base;
if (L->openupval) luaF_close(L, base);
for (aux = 0; pfunc+aux < L->top; aux++) /* move frame down */ for (aux = 0; pfunc+aux < L->top; aux++) /* move frame down */
setobjs2s(L, func+aux, pfunc+aux); setobjs2s(L, func+aux, pfunc+aux);
ci->top = L->top = func+aux; /* correct top */ ci->top = L->top = func+aux; /* correct top */