aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2002-11-14 14:16:21 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2002-11-14 14:16:21 -0200
commitb40c9f7a3ce181134e12d13c0d2284c8fd093735 (patch)
treeb07ee6fb441e8dc93a508c067a4021da14fed6cb
parent41fd639cab8e2835ad2860442c19eb78fbc777be (diff)
downloadlua-b40c9f7a3ce181134e12d13c0d2284c8fd093735.tar.gz
lua-b40c9f7a3ce181134e12d13c0d2284c8fd093735.tar.bz2
lua-b40c9f7a3ce181134e12d13c0d2284c8fd093735.zip
better code to signal write barriers
-rw-r--r--lobject.h8
-rw-r--r--lvm.h4
2 files changed, 7 insertions, 5 deletions
diff --git a/lobject.h b/lobject.h
index d96229ac..4fb42461 100644
--- a/lobject.h
+++ b/lobject.h
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lobject.h,v 1.153 2002/11/13 11:49:19 roberto Exp roberto $ 2** $Id: lobject.h,v 1.154 2002/11/14 11:51:50 roberto Exp roberto $
3** Type definitions for Lua objects 3** Type definitions for Lua objects
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -154,12 +154,14 @@ typedef struct lua_TObject {
154#define setobjs2s setobj 154#define setobjs2s setobj
155/* to stack (not from same stack) */ 155/* to stack (not from same stack) */
156#define setobj2s setobj 156#define setobj2s setobj
157#define setsvalue2s setsvalue
157/* from table to same table */ 158/* from table to same table */
158#define setobjt2t setobj 159#define setobjt2t setobj
159/* to table */ 160/* to table */
160#define setobj2t setobj 161#define setobj2t setobj
161/* string to stack */ 162/* to new object */
162#define setsvalue2s setsvalue 163#define setobj2n setobj
164#define setsvalue2n setsvalue
163 165
164#define setttype(obj, tt) (ttype(obj) = (tt)) 166#define setttype(obj, tt) (ttype(obj) = (tt))
165 167
diff --git a/lvm.h b/lvm.h
index 17cbfb8c..028bb28d 100644
--- a/lvm.h
+++ b/lvm.h
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lvm.h,v 1.45 2002/08/05 17:36:24 roberto Exp roberto $ 2** $Id: lvm.h,v 1.46 2002/08/07 19:22:39 roberto Exp roberto $
3** Lua virtual machine 3** Lua virtual machine
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -25,7 +25,7 @@
25int luaV_lessthan (lua_State *L, const TObject *l, const TObject *r); 25int luaV_lessthan (lua_State *L, const TObject *l, const TObject *r);
26int luaV_equalval (lua_State *L, const TObject *t1, const TObject *t2); 26int luaV_equalval (lua_State *L, const TObject *t1, const TObject *t2);
27const TObject *luaV_tonumber (const TObject *obj, TObject *n); 27const TObject *luaV_tonumber (const TObject *obj, TObject *n);
28int luaV_tostring (lua_State *L, TObject *obj); 28int luaV_tostring (lua_State *L, StkId obj);
29const TObject *luaV_gettable (lua_State *L, const TObject *t, TObject *key, 29const TObject *luaV_gettable (lua_State *L, const TObject *t, TObject *key,
30 int loop); 30 int loop);
31void luaV_settable (lua_State *L, const TObject *t, TObject *key, StkId val); 31void luaV_settable (lua_State *L, const TObject *t, TObject *key, StkId val);