mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2024-11-26 14:51:21 +03:00
Code Issues Packages Projects Releases Wiki Activity

'loadin' should not check whether upvalue is called '_ENV',

Browse Source 
because its name may be unknown when there is no debug information.
This commit is contained in:
Roberto Ierusalimschy 2010-09-07 16:38:36 -03:00
parent e3eabcf913
commit a289a62717
1 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lbaselib.c
View File

@ -1,5 +1,5 @@
/*
** $Id: lbaselib.c,v 1.248 2010/09/03 14:14:01 roberto Exp roberto $
** $Id: lbaselib.c,v 1.249 2010/09/07 19:21:39 roberto Exp roberto $
** Basic library
** See Copyright Notice in lua.h
*/
@ -333,11 +333,9 @@ static int luaB_loadin (lua_State *L) {
luaL_checkany(L, 1);
n = luaB_load_aux(L, 2);
if (n == 1) { /* success? */
const char *name;
lua_pushvalue(L, 1); /* environment for loaded function */
name = lua_setupvalue(L, -2, 1);
if (name == NULL || strcmp(name, LUA_ENV) != 0)
luaL_error(L, "loaded chunk does not have environment upvalue");
if (lua_setupvalue(L, -2, 1) == NULL)
luaL_error(L, "loaded chunk does not have an upvalue");
}
return n;
}