aboutsummaryrefslogtreecommitdiff
path: root/lgc.h
diff options
context:
space:
mode:
Diffstat (limited to 'lgc.h')
-rw-r--r--lgc.h10
1 files changed, 1 insertions, 9 deletions
diff --git a/lgc.h b/lgc.h
index 13896d42..396f5a4e 100644
--- a/lgc.h
+++ b/lgc.h
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lgc.h,v 2.94 2017/04/06 13:08:56 roberto Exp roberto $ 2** $Id: lgc.h,v 2.95 2017/04/10 13:33:04 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*/
@@ -124,8 +124,6 @@
124#define changeage(o,f,t) \ 124#define changeage(o,f,t) \
125 check_exp(getage(o) == (f), (o)->marked ^= ((f)^(t))) 125 check_exp(getage(o) == (f), (o)->marked ^= ((f)^(t)))
126 126
127#define ongraylist(o) (isgray(o) || getage(o) == G_TOUCHED2)
128
129 127
130/* 128/*
131** Does one step of collection when debt becomes positive. 'pre'/'pos' 129** Does one step of collection when debt becomes positive. 'pre'/'pos'
@@ -153,10 +151,6 @@
153 (isblack(p) && iswhite(o)) ? \ 151 (isblack(p) && iswhite(o)) ? \
154 luaC_barrier_(L,obj2gco(p),obj2gco(o)) : cast_void(0)) 152 luaC_barrier_(L,obj2gco(p),obj2gco(o)) : cast_void(0))
155 153
156#define luaC_upvalbarrier(L,uv,x) ( \
157 (iscollectable(x) && !upisopen(uv)) ? \
158 luaC_upvalbarrier_(L,gcvalue(x)) : cast_void(0))
159
160LUAI_FUNC void luaC_fix (lua_State *L, GCObject *o); 154LUAI_FUNC void luaC_fix (lua_State *L, GCObject *o);
161LUAI_FUNC void luaC_freeallobjects (lua_State *L); 155LUAI_FUNC void luaC_freeallobjects (lua_State *L);
162LUAI_FUNC void luaC_step (lua_State *L); 156LUAI_FUNC void luaC_step (lua_State *L);
@@ -165,9 +159,7 @@ LUAI_FUNC void luaC_fullgc (lua_State *L, int isemergency);
165LUAI_FUNC GCObject *luaC_newobj (lua_State *L, int tt, size_t sz); 159LUAI_FUNC GCObject *luaC_newobj (lua_State *L, int tt, size_t sz);
166LUAI_FUNC void luaC_barrier_ (lua_State *L, GCObject *o, GCObject *v); 160LUAI_FUNC void luaC_barrier_ (lua_State *L, GCObject *o, GCObject *v);
167LUAI_FUNC void luaC_barrierback_ (lua_State *L, Table *o); 161LUAI_FUNC void luaC_barrierback_ (lua_State *L, Table *o);
168LUAI_FUNC void luaC_upvalbarrier_ (lua_State *L, GCObject *o);
169LUAI_FUNC void luaC_checkfinalizer (lua_State *L, GCObject *o, Table *mt); 162LUAI_FUNC void luaC_checkfinalizer (lua_State *L, GCObject *o, Table *mt);
170LUAI_FUNC void luaC_upvdeccount (lua_State *L, UpVal *uv);
171LUAI_FUNC void luaC_changemode (lua_State *L, int newmode); 163LUAI_FUNC void luaC_changemode (lua_State *L, int newmode);
172 164
173 165