diff options
Diffstat (limited to 'ldebug.c')
-rw-r--r-- | ldebug.c | 14 |
1 files changed, 7 insertions, 7 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldebug.c,v 1.88 2001/09/07 17:39:10 roberto Exp $ | 2 | ** $Id: ldebug.c,v 1.90 2001/10/02 16:45:03 roberto Exp $ |
3 | ** Debug Interface | 3 | ** Debug Interface |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -221,12 +221,12 @@ static const l_char *travtagmethods (global_State *G, const TObject *o) { | |||
221 | 221 | ||
222 | 222 | ||
223 | static const l_char *travglobals (lua_State *L, const TObject *o) { | 223 | static const l_char *travglobals (lua_State *L, const TObject *o) { |
224 | Hash *g = L->gt; | 224 | Table *g = L->gt; |
225 | int i; | 225 | int i = sizenode(g); |
226 | for (i=0; i<g->size; i++) { | 226 | while (i--) { |
227 | if (luaO_equalObj(o, val(node(g, i))) && | 227 | Node *n = node(g, i); |
228 | ttype(key(node(g, i))) == LUA_TSTRING) | 228 | if (luaO_equalObj(o, val(n)) && ttype(key(n)) == LUA_TSTRING) |
229 | return getstr(tsvalue(key(node(g, i)))); | 229 | return getstr(tsvalue(key(n))); |
230 | } | 230 | } |
231 | return NULL; | 231 | return NULL; |
232 | } | 232 | } |