diff options
Diffstat (limited to 'lgc.h')
-rw-r--r-- | lgc.h | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lgc.h,v 2.67 2013/08/27 18:53:35 roberto Exp roberto $ | 2 | ** $Id: lgc.h,v 2.68 2013/08/27 20:04:00 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 | */ |
@@ -117,7 +117,7 @@ | |||
117 | #define luaC_barrierback(L,p,v) { \ | 117 | #define luaC_barrierback(L,p,v) { \ |
118 | if (iscollectable(v) && \ | 118 | if (iscollectable(v) && \ |
119 | (nolocal(gcvalue(v)), isblack(obj2gco(p)) && iswhite(gcvalue(v)))) \ | 119 | (nolocal(gcvalue(v)), isblack(obj2gco(p)) && iswhite(gcvalue(v)))) \ |
120 | luaC_barrierback_(L,p); } | 120 | luaC_barrierback_(L,obj2gco(p)); } |
121 | 121 | ||
122 | #define luaC_objbarrier(L,p,o) { \ | 122 | #define luaC_objbarrier(L,p,o) { \ |
123 | if (nolocal(obj2gco(o)), isblack(obj2gco(p)) && iswhite(obj2gco(o))) \ | 123 | if (nolocal(obj2gco(o)), isblack(obj2gco(p)) && iswhite(obj2gco(o))) \ |
@@ -125,7 +125,7 @@ | |||
125 | 125 | ||
126 | #define luaC_objbarrierback(L,p,o) \ | 126 | #define luaC_objbarrierback(L,p,o) \ |
127 | { if (nolocal(obj2gco(o)), isblack(obj2gco(p)) && iswhite(obj2gco(o))) \ | 127 | { if (nolocal(obj2gco(o)), isblack(obj2gco(p)) && iswhite(obj2gco(o))) \ |
128 | luaC_barrierback_(L,p); } | 128 | luaC_barrierback_(L,obj2gco(p)); } |
129 | 129 | ||
130 | #define luaC_upvalbarrier(L,uv) \ | 130 | #define luaC_upvalbarrier(L,uv) \ |
131 | { if (iscollectable((uv)->v) && !upisopen(uv)) \ | 131 | { if (iscollectable((uv)->v) && !upisopen(uv)) \ |