diff options
Diffstat (limited to 'lbaselib.c')
-rw-r--r-- | lbaselib.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lbaselib.c,v 1.39 2001/07/12 18:11:58 roberto Exp $ | 2 | ** $Id: lbaselib.c,v 1.41 2001/08/31 19:46:07 roberto Exp $ |
3 | ** Basic library | 3 | ** Basic library |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -234,7 +234,7 @@ static int luaB_settagmethod (lua_State *L) { | |||
234 | luaL_arg_check(L, lua_isfunction(L, 3) || lua_isnil(L, 3), 3, | 234 | luaL_arg_check(L, lua_isfunction(L, 3) || lua_isnil(L, 3), 3, |
235 | l_s("function or nil expected")); | 235 | l_s("function or nil expected")); |
236 | if (strcmp(event, l_s("gc")) == 0) | 236 | if (strcmp(event, l_s("gc")) == 0) |
237 | lua_error(L, l_s("deprecated use: cannot set the `gc' tag method from Lua")); | 237 | lua_error(L, l_s("cannot set `gc' tag method from Lua")); |
238 | lua_gettagmethod(L, tag, event); | 238 | lua_gettagmethod(L, tag, event); |
239 | lua_pushvalue(L, 3); | 239 | lua_pushvalue(L, 3); |
240 | lua_settagmethod(L, tag, event); | 240 | lua_settagmethod(L, tag, event); |
@@ -246,7 +246,7 @@ static int luaB_gettagmethod (lua_State *L) { | |||
246 | int tag = gettag(L, 1); | 246 | int tag = gettag(L, 1); |
247 | const l_char *event = luaL_check_string(L, 2); | 247 | const l_char *event = luaL_check_string(L, 2); |
248 | if (strcmp(event, l_s("gc")) == 0) | 248 | if (strcmp(event, l_s("gc")) == 0) |
249 | lua_error(L, l_s("deprecated use: cannot get the `gc' tag method from Lua")); | 249 | lua_error(L, l_s("cannot get `gc' tag method from Lua")); |
250 | lua_gettagmethod(L, tag, event); | 250 | lua_gettagmethod(L, tag, event); |
251 | return 1; | 251 | return 1; |
252 | } | 252 | } |
@@ -451,7 +451,7 @@ static int luaB_call (lua_State *L) { | |||
451 | return 1; | 451 | return 1; |
452 | } | 452 | } |
453 | if (strchr(options, l_c('p'))) /* pack results? */ | 453 | if (strchr(options, l_c('p'))) /* pack results? */ |
454 | lua_error(L, l_s("deprecated option `p' in `call'")); | 454 | lua_error(L, l_s("obsolete option `p' in `call'")); |
455 | return lua_gettop(L) - oldtop; /* results are already on the stack */ | 455 | return lua_gettop(L) - oldtop; /* results are already on the stack */ |
456 | } | 456 | } |
457 | 457 | ||