lua

commit 18fb3ddb897564178bebec44dbe04fabcebf39c5
parent 2bddbe660321547e606022f9c82e9511e54d5df6
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Tue, 10 Oct 2000 17:52:36 -0200

details.

Diffstat:
M
lfunc.c
 | 
25
++++++++++++++-----------

1 file changed, 14 insertions(+), 11 deletions(-)
diff --git a/lfunc.c b/lfunc.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lfunc.c,v 1.30 2000/08/22 17:44:17 roberto Exp roberto $
+** $Id: lfunc.c,v 1.31 2000/09/29 12:42:13 roberto Exp roberto $
 ** Auxiliary functions to manipulate prototypes and closures
 ** See Copyright Notice in lua.h
 */
@@ -31,23 +31,26 @@ Closure *luaF_newclosure (lua_State *L, int nelems) {
 
 Proto *luaF_newproto (lua_State *L) {
   Proto *f = luaM_new(L, Proto);
+  f->knum = NULL;
+  f->nknum = 0;
+  f->kstr = NULL;
+  f->nkstr = 0;
+  f->kproto = NULL;
+  f->nkproto = 0;
   f->code = NULL;
   f->ncode = 0;
+  f->numparams = 0;
+  f->is_vararg = 0;
+  f->maxstacksize = 0;
+  f->marked = 0;
   f->lineinfo = NULL;
   f->nlineinfo = 0;
+  f->nlocvars = 0;
+  f->locvars = NULL;
   f->lineDefined = 0;
   f->source = NULL;
-  f->kstr = NULL;
-  f->nkstr = 0;
-  f->knum = NULL;
-  f->nknum = 0;
-  f->kproto = NULL;
-  f->nkproto = 0;
-  f->locvars = NULL;
-  f->nlocvars = 0;
-  f->next = L->rootproto;
+  f->next = L->rootproto;  /* chain in list of protos */
   L->rootproto = f;
-  f->marked = 0;
   return f;
 }