lua

commit d84cc9d2dbf1f44e7126fe3ed9a82eed9757a63a
parent 7d45a5f48ff32a4e09a1734de23823943d6a6b28
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Fri, 18 Feb 2005 10:49:46 -0200

small bug

Diffstat:
M
lvm.c
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lvm.c b/lvm.c
@@ -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
 ** See Copyright Notice in lua.h
 */
@@ -620,9 +620,9 @@ StkId luaV_execute (lua_State *L, int nexeccalls) {
           int aux;
           StkId func = ci->func;
           StkId pfunc = (ci+1)->func;  /* previous function index */
+          if (L->openupval) luaF_close(L, base);
           base = ci->base = ci->func + ((ci+1)->base - pfunc);
           L->base = base;
-          if (L->openupval) luaF_close(L, base);
           for (aux = 0; pfunc+aux < L->top; aux++)  /* move frame down */
             setobjs2s(L, func+aux, pfunc+aux);
           ci->top = L->top = func+aux;  /* correct top */