mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2025-02-07 00:34:00 +03:00
Code Issues Packages Projects Releases Wiki Activity

better names for barrier macros

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2010-06-04 10:05:29 -03:00
parent e94fac8956
commit 3819c30e55
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lapi.c
View File

@ -1,5 +1,5 @@
/*
** $Id: lapi.c,v 2.129 2010/05/14 13:15:26 roberto Exp roberto $
** $Id: lapi.c,v 2.130 2010/05/31 16:08:55 roberto Exp roberto $
** Lua API
** See Copyright Notice in lua.h
*/
@ -689,7 +689,7 @@ LUA_API void lua_rawset (lua_State *L, int idx) {
t = index2addr(L, idx);
api_check(L, ttistable(t), "table expected");
setobj2t(L, luaH_set(L, hvalue(t), L->top-2), L->top-1);
luaC_barriert(L, hvalue(t), L->top-1);
luaC_barrierback(L, gcvalue(t), L->top-1);
L->top -= 2;
lua_unlock(L);
}
@ -702,7 +702,7 @@ LUA_API void lua_rawseti (lua_State *L, int idx, int n) {
o = index2addr(L, idx);
api_check(L, ttistable(o), "table expected");
setobj2t(L, luaH_setint(L, hvalue(o), n), L->top-1);
luaC_barriert(L, hvalue(o), L->top-1);
luaC_barrierback(L, gcvalue(o), L->top-1);
L->top--;
lua_unlock(L);
}
@ -725,7 +725,7 @@ LUA_API int lua_setmetatable (lua_State *L, int objindex) {
case LUA_TTABLE: {
hvalue(obj)->metatable = mt;
if (mt)
luaC_objbarriert(L, hvalue(obj), mt);
luaC_objbarrierback(L, gcvalue(obj), mt);
break;
}
case LUA_TUSERDATA: {

4
ltable.c
View File

@ -1,5 +1,5 @@
/*
** $Id: ltable.c,v 2.49 2010/04/13 20:48:12 roberto Exp roberto $
** $Id: ltable.c,v 2.50 2010/04/18 13:22:48 roberto Exp roberto $
** Lua tables (hash)
** See Copyright Notice in lua.h
*/
@ -423,7 +423,7 @@ static TValue *newkey (lua_State *L, Table *t, const TValue *key) {
}
}
setobj2t(L, gkey(mp), key);
luaC_barriert(L, t, key);
luaC_barrierback(L, obj2gco(t), key);
lua_assert(ttisnil(gval(mp)));
return gval(mp);
}