diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2003-10-20 15:42:41 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2003-10-20 15:42:41 -0200 |
commit | c51bcf4796d1e39bb9840825a72085c9a51ec402 (patch) | |
tree | 221a63329b5fc7cbca88110c36022df8026b13e9 /lfunc.c | |
parent | 03bab90303270534ba6a415b5379d4659757082d (diff) | |
download | lua-github-c51bcf4796d1e39bb9840825a72085c9a51ec402.tar.gz |
it's ok to dump functions with upvalues
Diffstat (limited to 'lfunc.c')
-rw-r--r-- | lfunc.c | 11 |
1 files changed, 10 insertions, 1 deletions
@@ -1,5 +1,5 @@ /* -** $Id: lfunc.c,v 1.67 2003/03/18 12:50:04 roberto Exp roberto $ +** $Id: lfunc.c,v 1.68 2003/10/02 19:21:09 roberto Exp roberto $ ** Auxiliary functions to manipulate prototypes and closures ** See Copyright Notice in lua.h */ @@ -45,6 +45,15 @@ Closure *luaF_newLclosure (lua_State *L, int nelems, TObject *e) { } +UpVal *luaF_newupval (lua_State *L) { + UpVal *p = luaM_new(L, UpVal); + luaC_link(L, valtogco(p), LUA_TUPVAL); + p->v = &p->value; + setnilvalue(p->v); + return p; +} + + UpVal *luaF_findupval (lua_State *L, StkId level) { GCObject **pp = &L->openupval; UpVal *p; |