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

lua_setfenv/lua_getfenv should also manipulate threads

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2005-07-06 15:07:30 -03:00
parent 7f97ec286e
commit b3f7a43019
1 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lapi.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lapi.c,v 2.43 2005/05/31 14:34:02 roberto Exp roberto $ ** $Id: lapi.c,v 2.44 2005/07/05 14:30:31 roberto Exp roberto $
** Lua API ** Lua API
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -618,6 +618,9 @@ LUA_API void lua_getfenv (lua_State *L, int idx) {
case LUA_TUSERDATA: case LUA_TUSERDATA:
sethvalue(L, L->top, uvalue(o)->env); sethvalue(L, L->top, uvalue(o)->env);
break; break;
case LUA_TTHREAD:
setobj2s(L, L->top, gt(thvalue(o)));
break;
default: default:
setnilvalue(L->top); setnilvalue(L->top);
break; break;
@@ -736,6 +739,9 @@ LUA_API int lua_setfenv (lua_State *L, int idx) {
case LUA_TUSERDATA: case LUA_TUSERDATA:
uvalue(o)->env = hvalue(L->top - 1); uvalue(o)->env = hvalue(L->top - 1);
break; break;
case LUA_TTHREAD:
sethvalue(L, gt(thvalue(o)), hvalue(L->top - 1));
break;
default: default:
res = 0; res = 0;
break; break;