diff options
Diffstat (limited to 'lgc.c')
| -rw-r--r-- | lgc.c | 4 |
1 files changed, 3 insertions, 1 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lgc.c,v 2.143 2013/08/07 12:18:11 roberto Exp roberto $ | 2 | ** $Id: lgc.c,v 2.144 2013/08/07 15:39:09 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 | */ |
| @@ -63,6 +63,8 @@ | |||
| 63 | #define black2gray(x) resetbit(gch(x)->marked, BLACKBIT) | 63 | #define black2gray(x) resetbit(gch(x)->marked, BLACKBIT) |
| 64 | 64 | ||
| 65 | 65 | ||
| 66 | #define valiswhite(x) (iscollectable(x) && iswhite(gcvalue(x))) | ||
| 67 | |||
| 66 | #define isfinalized(x) testbit(gch(x)->marked, FINALIZEDBIT) | 68 | #define isfinalized(x) testbit(gch(x)->marked, FINALIZEDBIT) |
| 67 | 69 | ||
| 68 | #define checkdeadkey(n) lua_assert(!ttisdeadkey(gkey(n)) || ttisnil(gval(n))) | 70 | #define checkdeadkey(n) lua_assert(!ttisdeadkey(gkey(n)) || ttisnil(gval(n))) |