diff options
Diffstat (limited to 'ltests.c')
| -rw-r--r-- | ltests.c | 8 |
1 files changed, 4 insertions, 4 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltests.c,v 2.12 2004/09/21 16:54:32 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 2.13 2004/09/29 21:00:25 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 | */ |
| @@ -554,13 +554,13 @@ static int table_query (lua_State *L) { | |||
| 554 | if (!ttisnil(gval(gnode(t, i))) || | 554 | if (!ttisnil(gval(gnode(t, i))) || |
| 555 | ttisnil(gkey(gnode(t, i))) || | 555 | ttisnil(gkey(gnode(t, i))) || |
| 556 | ttisnumber(gkey(gnode(t, i)))) { | 556 | ttisnumber(gkey(gnode(t, i)))) { |
| 557 | luaA_pushobject(L, gkey(gnode(t, i))); | 557 | luaA_pushobject(L, key2tval(gnode(t, i))); |
| 558 | } | 558 | } |
| 559 | else | 559 | else |
| 560 | lua_pushliteral(L, "<undef>"); | 560 | lua_pushliteral(L, "<undef>"); |
| 561 | luaA_pushobject(L, gval(gnode(t, i))); | 561 | luaA_pushobject(L, gval(gnode(t, i))); |
| 562 | if (t->node[i].next) | 562 | if (gnext(&t->node[i])) |
| 563 | lua_pushinteger(L, t->node[i].next - t->node); | 563 | lua_pushinteger(L, gnext(&t->node[i]) - t->node); |
| 564 | else | 564 | else |
| 565 | lua_pushnil(L); | 565 | lua_pushnil(L); |
| 566 | } | 566 | } |
