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

first step towards _ENV: all chunks have an puvalues _ENV with the

Browse Source 
global table
This commit is contained in:
Roberto Ierusalimschy
2010-03-08 13:55:52 -03:00
parent c295147874
commit 1124cb1247
3 changed files with 33 additions and 13 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.112 2010/01/21 16:49:21 roberto Exp roberto $
** $Id: lapi.c,v 2.113 2010/02/09 11:55:37 roberto Exp roberto $
** Lua API
** See Copyright Notice in lua.h
*/
@@ -882,6 +882,12 @@ LUA_API int lua_load (lua_State *L, lua_Reader reader, void *data,
if (!chunkname) chunkname = "?";
luaZ_init(L, &z, reader, data);
status = luaD_protectedparser(L, &z, chunkname);
if (status == LUA_OK) {
Closure *f = clvalue(L->top - 1);
lua_assert(!f->c.isC);
if (f->l.nupvalues == 1)
sethvalue(L, f->l.upvals[0]->v, G(L)->l_gt);
}
lua_unlock(L);
return status;
}