From 18fb3ddb897564178bebec44dbe04fabcebf39c5 Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Tue, 10 Oct 2000 17:52:58 -0200 Subject: details. --- lfunc.c | 25 ++++++++++++++----------- 1 file changed, 14 insertions(+), 11 deletions(-) diff --git a/lfunc.c b/lfunc.c index 73c443bb..d77c466d 100644 --- 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; } -- cgit v1.2.3-55-g6feb