diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2010-06-07 13:55:34 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2010-06-07 13:55:34 -0300 |
commit | fabe4ec487cb034ef983a29c52df2927be463d3c (patch) | |
tree | 4b824977d6b99b657c821681ca1a643ad345569a /lgc.h | |
parent | 575074fd857b90cd7c14c7b172e8fe147080962a (diff) | |
download | lua-fabe4ec487cb034ef983a29c52df2927be463d3c.tar.gz lua-fabe4ec487cb034ef983a29c52df2927be463d3c.tar.bz2 lua-fabe4ec487cb034ef983a29c52df2927be463d3c.zip |
better barrier for prototypes
Diffstat (limited to 'lgc.h')
-rw-r--r-- | lgc.h | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lgc.h,v 2.41 2010/05/10 18:23:45 roberto Exp roberto $ | 2 | ** $Id: lgc.h,v 2.42 2010/06/04 13:25:10 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,8 @@ | |||
124 | #define luaC_objbarrierback(L,p,o) \ | 124 | #define luaC_objbarrierback(L,p,o) \ |
125 | { if (iswhite(obj2gco(o)) && isblack(obj2gco(p))) luaC_barrierback_(L,p); } | 125 | { if (iswhite(obj2gco(o)) && isblack(obj2gco(p))) luaC_barrierback_(L,p); } |
126 | 126 | ||
127 | #define luaC_barrierproto(L,p) \ | 127 | #define luaC_barrierproto(L,p,c) \ |
128 | { if (isblack(obj2gco(p))) luaC_barrierproto_(L,p); } | 128 | { if (isblack(obj2gco(p))) luaC_barrierproto_(L,p,c); } |
129 | 129 | ||
130 | LUAI_FUNC void luaC_separateudata (lua_State *L, int all); | 130 | LUAI_FUNC void luaC_separateudata (lua_State *L, int all); |
131 | LUAI_FUNC void luaC_freeallobjects (lua_State *L); | 131 | LUAI_FUNC void luaC_freeallobjects (lua_State *L); |
@@ -136,7 +136,7 @@ LUAI_FUNC GCObject *luaC_newobj (lua_State *L, int tt, size_t sz, | |||
136 | GCObject **list, int offset); | 136 | GCObject **list, int offset); |
137 | LUAI_FUNC void luaC_barrier_ (lua_State *L, GCObject *o, GCObject *v); | 137 | LUAI_FUNC void luaC_barrier_ (lua_State *L, GCObject *o, GCObject *v); |
138 | LUAI_FUNC void luaC_barrierback_ (lua_State *L, GCObject *o); | 138 | LUAI_FUNC void luaC_barrierback_ (lua_State *L, GCObject *o); |
139 | LUAI_FUNC void luaC_barrierproto_ (lua_State *L, GCObject *p); | 139 | LUAI_FUNC void luaC_barrierproto_ (lua_State *L, Proto *p, Closure *c); |
140 | LUAI_FUNC void luaC_checkfinalizer (lua_State *L, Udata *u); | 140 | LUAI_FUNC void luaC_checkfinalizer (lua_State *L, Udata *u); |
141 | LUAI_FUNC void luaC_checkupvalcolor (global_State *g, UpVal *uv); | 141 | LUAI_FUNC void luaC_checkupvalcolor (global_State *g, UpVal *uv); |
142 | LUAI_FUNC void luaC_changemode (lua_State *L, int mode); | 142 | LUAI_FUNC void luaC_changemode (lua_State *L, int mode); |