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 | } |
