diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2002-11-13 09:32:26 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2002-11-13 09:32:26 -0200 |
| commit | 2f91f95d94d3a27fee6b45c31ea9ab631924a8bf (patch) | |
| tree | bbc605f6643b4958f45536dc5f5f84297eda70c2 /ltests.c | |
| parent | 42dd080a2e3e8fb6887ca1e066f53bb8fd23c9e7 (diff) | |
| download | lua-2f91f95d94d3a27fee6b45c31ea9ab631924a8bf.tar.gz lua-2f91f95d94d3a27fee6b45c31ea9ab631924a8bf.tar.bz2 lua-2f91f95d94d3a27fee6b45c31ea9ab631924a8bf.zip | |
better control over GCObjects
Diffstat (limited to 'ltests.c')
| -rw-r--r-- | ltests.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltests.c,v 1.139 2002/10/25 21:29:20 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 1.140 2002/11/07 15:37:10 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 | */ |
| @@ -326,7 +326,7 @@ static int string_query (lua_State *L) { | |||
| 326 | GCObject *ts; | 326 | GCObject *ts; |
| 327 | int n = 0; | 327 | int n = 0; |
| 328 | for (ts = tb->hash[s]; ts; ts = ts->gch.next) { | 328 | for (ts = tb->hash[s]; ts; ts = ts->gch.next) { |
| 329 | setsvalue2s(L->top, &ts->ts); | 329 | setsvalue2s(L->top, gcotots(ts)); |
| 330 | incr_top(L); | 330 | incr_top(L); |
| 331 | n++; | 331 | n++; |
| 332 | } | 332 | } |
