aboutsummaryrefslogtreecommitdiff
path: root/ltests.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2022-11-29 10:37:08 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2022-11-29 10:37:08 -0300
commitd324a0ccf9e2511baf182dd981a8ee9835cee925 (patch)
tree7cb36618c0cbafb4a0216a117fd25a78250991a5 /ltests.c
parent152b51955aabb9dfb32302569fac810e999eda03 (diff)
downloadlua-d324a0ccf9e2511baf182dd981a8ee9835cee925.tar.gz
lua-d324a0ccf9e2511baf182dd981a8ee9835cee925.tar.bz2
lua-d324a0ccf9e2511baf182dd981a8ee9835cee925.zip
Simpler control for major collections
Diffstat (limited to 'ltests.c')
-rw-r--r--ltests.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/ltests.c b/ltests.c
index cc4bf58f..3f67c23a 100644
--- a/ltests.c
+++ b/ltests.c
@@ -297,7 +297,7 @@ static int testobjref1 (global_State *g, GCObject *f, GCObject *t) {
297 if (isdead(g,t)) return 0; 297 if (isdead(g,t)) return 0;
298 if (issweepphase(g)) 298 if (issweepphase(g))
299 return 1; /* no invariants */ 299 return 1; /* no invariants */
300 else if (g->gckind == KGC_INC) 300 else if (g->gckind != KGC_GEN)
301 return !(isblack(f) && iswhite(t)); /* basic incremental invariant */ 301 return !(isblack(f) && iswhite(t)); /* basic incremental invariant */
302 else { /* generational mode */ 302 else { /* generational mode */
303 if ((getage(f) == G_OLD && isblack(f)) && !isold(t)) 303 if ((getage(f) == G_OLD && isblack(f)) && !isold(t))