diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2003-12-03 18:03:07 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2003-12-03 18:03:07 -0200 |
commit | c6eac44a9420a26a2f8907dcd5266a6aecdb18ea (patch) | |
tree | acbf11560fe8aee5dddf37ff52b9fcaa6e697ca6 /lfunc.c | |
parent | 8878554b854009066eeccfe7b17e6e019c69758a (diff) | |
download | lua-c6eac44a9420a26a2f8907dcd5266a6aecdb18ea.tar.gz lua-c6eac44a9420a26a2f8907dcd5266a6aecdb18ea.tar.bz2 lua-c6eac44a9420a26a2f8907dcd5266a6aecdb18ea.zip |
two different white flags (to distinguish dead elements from new ones)
Diffstat (limited to 'lfunc.c')
-rw-r--r-- | lfunc.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lfunc.c,v 1.71 2003/11/19 19:41:30 roberto Exp roberto $ | 2 | ** $Id: lfunc.c,v 1.72 2003/11/24 18:50:36 roberto Exp roberto $ |
3 | ** Auxiliary functions to manipulate prototypes and closures | 3 | ** Auxiliary functions to manipulate prototypes and closures |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -71,7 +71,6 @@ void luaF_close (lua_State *L, StkId level) { | |||
71 | setobj(&uv->value, uv->v); /* save current value (write barrier) */ | 71 | setobj(&uv->value, uv->v); /* save current value (write barrier) */ |
72 | uv->v = &uv->value; /* now current value lives here */ | 72 | uv->v = &uv->value; /* now current value lives here */ |
73 | L->openupval = uv->next; /* remove from `open' list */ | 73 | L->openupval = uv->next; /* remove from `open' list */ |
74 | resetbit(uv->marked, FIXEDBIT); /* closed upvalues can be collected */ | ||
75 | luaC_link(L, valtogco(uv), LUA_TUPVAL); | 74 | luaC_link(L, valtogco(uv), LUA_TUPVAL); |
76 | } | 75 | } |
77 | } | 76 | } |