diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2010-05-10 15:24:36 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2010-05-10 15:24:36 -0300 |
commit | 0567221848b1802ab18cc2ac3e0ae5dc7fd46dc1 (patch) | |
tree | 0cd0f6b0c7780d7f34d05401f4479d4636c75f21 | |
parent | 1c1a98e872ad09b12fe2085031f0045f993ca5f0 (diff) | |
download | lua-0567221848b1802ab18cc2ac3e0ae5dc7fd46dc1.tar.gz lua-0567221848b1802ab18cc2ac3e0ae5dc7fd46dc1.tar.bz2 lua-0567221848b1802ab18cc2ac3e0ae5dc7fd46dc1.zip |
udata in 'tobefnz' list be have old bit on (it will be cleared
when udata is moved to 'allgc' list)
-rw-r--r-- | ltests.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ltests.c,v 2.103 2010/05/07 18:09:23 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 2.104 2010/05/07 18:23:17 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 | */ |
@@ -442,7 +442,6 @@ int lua_checkmemory (lua_State *L) { | |||
442 | for (o = g->tobefnz; o != NULL; o = gch(o)->next) { | 442 | for (o = g->tobefnz; o != NULL; o = gch(o)->next) { |
443 | lua_assert(gch(o)->tt == LUA_TUSERDATA); | 443 | lua_assert(gch(o)->tt == LUA_TUSERDATA); |
444 | lua_assert(isblack(o)); | 444 | lua_assert(isblack(o)); |
445 | lua_assert(!isold(o)); | ||
446 | lua_assert(testbit(o->gch.marked, SEPARATED)); | 445 | lua_assert(testbit(o->gch.marked, SEPARATED)); |
447 | } | 446 | } |
448 | /* check 'uvhead' list */ | 447 | /* check 'uvhead' list */ |