diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2017-04-24 13:59:26 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2017-04-24 13:59:26 -0300 |
| commit | 69371c4b84becac09c445aae01d005b49658ef82 (patch) | |
| tree | 03b0b5df405dbd77b481e98ccd67d46c166d492b /ltests.c | |
| parent | 6a98aa0bb0426acdf4a9ef75b1d3200fd972e77d (diff) | |
| download | lua-69371c4b84becac09c445aae01d005b49658ef82.tar.gz lua-69371c4b84becac09c445aae01d005b49658ef82.tar.bz2 lua-69371c4b84becac09c445aae01d005b49658ef82.zip | |
'KGC_NORMAL' -> 'KGC_INC' + emergency GC signalled by flag (instead
of mode)
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 2.213 2017/04/18 19:42:12 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 2.214 2017/04/19 18:46:47 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 | */ |
| @@ -199,7 +199,7 @@ static int testobjref1 (global_State *g, GCObject *f, GCObject *t) { | |||
| 199 | if (isdead(g,t)) return 0; | 199 | if (isdead(g,t)) return 0; |
| 200 | if (issweepphase(g)) | 200 | if (issweepphase(g)) |
| 201 | return 1; /* no invariants */ | 201 | return 1; /* no invariants */ |
| 202 | else if (g->gckind == KGC_NORMAL) | 202 | else if (g->gckind == KGC_INC) |
| 203 | return !(isblack(f) && iswhite(t)); /* basic incremental invariant */ | 203 | return !(isblack(f) && iswhite(t)); /* basic incremental invariant */ |
| 204 | else { /* generational mode */ | 204 | else { /* generational mode */ |
| 205 | if ((getage(f) == G_OLD && isblack(f)) && !isold(t)) | 205 | if ((getage(f) == G_OLD && isblack(f)) && !isold(t)) |