lua

commit 201288b4dfb6abb5a161e4358d878635f2ddb982
parent 62367dda449d2eb3c28b686664b920808ff0f334
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Sun, 23 Oct 2005 15:52:20 -0200

small bug

Diffstat:
M
ldo.c
 | 
7
+++++--

1 file changed, 5 insertions(+), 2 deletions(-)
diff --git a/ldo.c b/ldo.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ldo.c,v 2.34 2005/10/06 20:44:22 roberto Exp roberto $
+** $Id: ldo.c,v 2.35 2005/10/14 16:23:33 roberto Exp roberto $
 ** Stack and Call structure of Lua
 ** See Copyright Notice in lua.h
 */
@@ -276,8 +276,11 @@ int luaD_precall (lua_State *L, StkId func, int nresults) {
     Proto *p = cl->p;
     luaD_checkstack(L, p->maxstacksize);
     func = restorestack(L, funcr);
-    if (!p->is_vararg)  /* no varargs? */
+    if (!p->is_vararg) {  /* no varargs? */
       base = func + 1;
+      if (L->top > base + p->numparams)
+        L->top = base + p->numparams;
+    }
     else {  /* vararg function */
       int nargs = cast(int, L->top - func) - 1;
       base = adjust_varargs(L, p, nargs);