diff options
Diffstat (limited to 'ltests.c')
-rw-r--r-- | ltests.c | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ltests.c,v 2.11 2004/08/24 20:12:06 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 2.12 2004/09/21 16:54:32 roberto Exp roberto $ |
3 | ** Internal Module for Debugging of the Lua Implementation | 3 | ** Internal Module for Debugging of the Lua Implementation |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -1049,8 +1049,8 @@ static int auxgsub (lua_State *L) { | |||
1049 | static int auxgetf (lua_State *L) { | 1049 | static int auxgetf (lua_State *L) { |
1050 | const char *s = luaL_checkstring(L, 1); | 1050 | const char *s = luaL_checkstring(L, 1); |
1051 | lua_settop(L, 2); | 1051 | lua_settop(L, 2); |
1052 | lua_pushstring(L, luaL_getfield(L, s)); | 1052 | lua_pushstring(L, luaL_getfield(L, 2, s)); |
1053 | lua_assert(lua_gettop(L) == 3); | 1053 | lua_assert(lua_gettop(L) == 4); |
1054 | return 2; | 1054 | return 2; |
1055 | } | 1055 | } |
1056 | 1056 | ||
@@ -1058,8 +1058,8 @@ static int auxgetf (lua_State *L) { | |||
1058 | static int auxsetf (lua_State *L) { | 1058 | static int auxsetf (lua_State *L) { |
1059 | const char *s = luaL_checkstring(L, 1); | 1059 | const char *s = luaL_checkstring(L, 1); |
1060 | lua_settop(L, 3); | 1060 | lua_settop(L, 3); |
1061 | lua_pushstring(L, luaL_setfield(L, s)); | 1061 | lua_pushstring(L, luaL_setfield(L, 2, s)); |
1062 | lua_assert(lua_gettop(L) == 2); | 1062 | lua_assert(lua_gettop(L) == 3); |
1063 | return 1; | 1063 | return 1; |
1064 | } | 1064 | } |
1065 | 1065 | ||