diff options
Diffstat (limited to 'lbuiltin.c')
-rw-r--r-- | lbuiltin.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lbuiltin.c,v 1.121 2000/08/15 18:28:48 roberto Exp roberto $ | 2 | ** $Id: lbuiltin.c,v 1.122 2000/08/28 17:57:04 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 | */ |
@@ -640,7 +640,7 @@ static void deprecated_funcs (lua_State *L) { | |||
640 | hvalue(>) = L->gt; | 640 | hvalue(>) = L->gt; |
641 | for (i=0; i<num_deprecated; i++) { | 641 | for (i=0; i<num_deprecated; i++) { |
642 | lua_pushobject(L, >); | 642 | lua_pushobject(L, >); |
643 | lua_pushcclosure(L, deprecated_global_funcs[i].func, 1); | 643 | lua_pushcclosure(L, deprecated_global_funcs[i].func, 1); ?? |
644 | lua_setglobal(L, deprecated_global_funcs[i].name); | 644 | lua_setglobal(L, deprecated_global_funcs[i].name); |
645 | } | 645 | } |
646 | luaL_openl(L, other_deprecated_global_funcs); | 646 | luaL_openl(L, other_deprecated_global_funcs); |
@@ -652,7 +652,7 @@ static void deprecated_funcs (lua_State *L) { | |||
652 | ** gives an explicit error in any attempt to call a deprecated function | 652 | ** gives an explicit error in any attempt to call a deprecated function |
653 | */ | 653 | */ |
654 | static int deprecated_func (lua_State *L) { | 654 | static int deprecated_func (lua_State *L) { |
655 | luaL_verror(L, "function `%.20s' is deprecated", luaL_check_string(L, 1)); | 655 | luaL_verror(L, "function `%.20s' is deprecated", luaL_check_string(L, -1)); |
656 | return 0; /* to avoid warnings */ | 656 | return 0; /* to avoid warnings */ |
657 | } | 657 | } |
658 | 658 | ||