rusefi
/
lua
mirror of https://github.com/rusefi/lua.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

it is unsafe to allow Lua to get gc tag methods

This commit is contained in:
Roberto Ierusalimschy 2000-10-20 14:57:42 -02:00
parent 64eecc0b82
commit b7ffb128cb
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lbaselib.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: lbaselib.c,v 1.11 2000/10/09 15:46:43 roberto Exp roberto $ ** $Id: lbaselib.c,v 1.12 2000/10/20 16:39:03 roberto Exp roberto $
** Basic library ** Basic library
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -179,7 +179,7 @@ static int luaB_rawset (lua_State *L) {
} }
static int luaB_settagmethod (lua_State *L) { static int luaB_settagmethod (lua_State *L) {
int tag = (int)luaL_check_int(L, 1); int tag = luaL_check_int(L, 1);
const char *event = luaL_check_string(L, 2); const char *event = luaL_check_string(L, 2);
luaL_arg_check(L, lua_isfunction(L, 3) || lua_isnil(L, 3), 3, luaL_arg_check(L, lua_isfunction(L, 3) || lua_isnil(L, 3), 3,
"function or nil expected"); "function or nil expected");
@ -190,7 +190,11 @@ static int luaB_settagmethod (lua_State *L) {
} }
static int luaB_gettagmethod (lua_State *L) { static int luaB_gettagmethod (lua_State *L) {
lua_gettagmethod(L, luaL_check_int(L, 1), luaL_check_string(L, 2)); int tag = luaL_check_int(L, 1);
const char *event = luaL_check_string(L, 2);
if (strcmp(event, "gc") == 0)
lua_error(L, "deprecated use: cannot get the `gc' tag method from Lua");
lua_gettagmethod(L, tag, event);
return 1; return 1;
} }