aboutsummaryrefslogtreecommitdiff
path: root/lbuiltin.c
diff options
context:
space:
mode:
Diffstat (limited to 'lbuiltin.c')
-rw-r--r--lbuiltin.c6
1 files changed, 2 insertions, 4 deletions
diff --git a/lbuiltin.c b/lbuiltin.c
index 544ff3fc..33421908 100644
--- a/lbuiltin.c
+++ b/lbuiltin.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lbuiltin.c,v 1.96 2000/03/10 18:37:44 roberto Exp roberto $ 2** $Id: lbuiltin.c,v 1.97 2000/03/24 17:26:08 roberto Exp roberto $
3** Built-in functions 3** Built-in functions
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -239,10 +239,8 @@ void luaB_settagmethod (lua_State *L) {
239 lua_Object nf = luaL_nonnullarg(L, 3); 239 lua_Object nf = luaL_nonnullarg(L, 3);
240 luaL_arg_check(L, lua_isnil(L, nf) || lua_isfunction(L, nf), 3, 240 luaL_arg_check(L, lua_isnil(L, nf) || lua_isfunction(L, nf), 3,
241 "function or nil expected"); 241 "function or nil expected");
242#ifndef LUA_COMPAT_GC
243 if (strcmp(event, "gc") == 0 && tag != TAG_NIL) 242 if (strcmp(event, "gc") == 0 && tag != TAG_NIL)
244 lua_error(L, "cannot set this `gc' tag method from Lua"); 243 lua_error(L, "deprecated use: cannot set the `gc' tag method from Lua");
245#endif
246 lua_pushobject(L, nf); 244 lua_pushobject(L, nf);
247 lua_pushobject(L, lua_settagmethod(L, tag, event)); 245 lua_pushobject(L, lua_settagmethod(L, tag, event));
248} 246}