diff options
Diffstat (limited to 'lgc.c')
-rw-r--r-- | lgc.c | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lgc.c,v 2.248 2018/02/19 16:02:25 roberto Exp roberto $ | 2 | ** $Id: lgc.c,v 2.248 2018/02/20 16:52:50 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 | */ |
@@ -79,6 +79,11 @@ | |||
79 | #define checkconsistency(obj) \ | 79 | #define checkconsistency(obj) \ |
80 | lua_longassert(!iscollectable(obj) || righttt(obj)) | 80 | lua_longassert(!iscollectable(obj) || righttt(obj)) |
81 | 81 | ||
82 | /* | ||
83 | ** Protected access to objects in values | ||
84 | */ | ||
85 | #define gcvalueN(o) (iscollectable(o) ? gcvalue(o) : NULL) | ||
86 | |||
82 | 87 | ||
83 | #define markvalue(g,o) { checkconsistency(o); \ | 88 | #define markvalue(g,o) { checkconsistency(o); \ |
84 | if (valiswhite(o)) reallymarkobject(g,gcvalue(o)); } | 89 | if (valiswhite(o)) reallymarkobject(g,gcvalue(o)); } |