diff options
Diffstat (limited to 'lgc.c')
-rw-r--r-- | lgc.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lgc.c,v 1.70 2000/10/05 12:14:08 roberto Exp roberto $ | 2 | ** $Id: lgc.c,v 1.71 2000/10/05 13:00:17 roberto Exp roberto $ |
3 | ** Garbage Collector | 3 | ** Garbage Collector |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -248,7 +248,7 @@ static void collectstrings (lua_State *L, int all) { | |||
248 | else { /* collect */ | 248 | else { /* collect */ |
249 | *p = next->nexthash; | 249 | *p = next->nexthash; |
250 | L->strt.nuse--; | 250 | L->strt.nuse--; |
251 | L->nblocks -= sizestring(next->u.s.len); | 251 | L->nblocks -= sizestring(next->len); |
252 | luaM_free(L, next); | 252 | luaM_free(L, next); |
253 | } | 253 | } |
254 | } | 254 | } |
@@ -273,7 +273,7 @@ static void collectudata (lua_State *L, int all) { | |||
273 | *p = next->nexthash; | 273 | *p = next->nexthash; |
274 | next->nexthash = L->TMtable[tag].collected; /* chain udata */ | 274 | next->nexthash = L->TMtable[tag].collected; /* chain udata */ |
275 | L->TMtable[tag].collected = next; | 275 | L->TMtable[tag].collected = next; |
276 | L->nblocks -= gcsizeudata; | 276 | L->nblocks -= sizestring(next->len); |
277 | L->udt.nuse--; | 277 | L->udt.nuse--; |
278 | } | 278 | } |
279 | } | 279 | } |