nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

small bug

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2005-04-29 10:54:05 -03:00
parent 8e696dd14a
commit 9832f6b186
1 changed files with 1 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lfunc.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lfunc.c,v 2.8 2005/02/10 13:25:02 roberto Exp roberto $ ** $Id: lfunc.c,v 2.9 2005/02/18 12:40:02 roberto Exp roberto $
** Auxiliary functions to manipulate prototypes and closures ** Auxiliary functions to manipulate prototypes and closures
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -105,10 +105,6 @@ void luaF_close (lua_State *L, StkId level) {
else { else {
unlinkupval(uv); unlinkupval(uv);
setobj(L, &uv->u.value, uv->v); setobj(L, &uv->u.value, uv->v);
if (isgray(o)) {
gray2black(o); /* closed upvalues are never gray */
luaC_barrier(L, uv, &uv->u.value);
}
uv->v = &uv->u.value; /* now current value lives here */ uv->v = &uv->u.value; /* now current value lives here */
luaC_linkupval(L, uv); /* link upvalue into `gcroot' list */ luaC_linkupval(L, uv); /* link upvalue into `gcroot' list */
} }