aboutsummaryrefslogtreecommitdiff
path: root/ltm.h
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>1999-11-22 11:12:07 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>1999-11-22 11:12:07 -0200
commit29ede6aa13144ff7b69c57a87be1ee93f57ae896 (patch)
treeadcfb5dcff7db55481cd675349e23dec0e63c939 /ltm.h
parent951897c09319ae5474a4b86bb7d615136577caa0 (diff)
downloadlua-29ede6aa13144ff7b69c57a87be1ee93f57ae896.tar.gz
lua-29ede6aa13144ff7b69c57a87be1ee93f57ae896.tar.bz2
lua-29ede6aa13144ff7b69c57a87be1ee93f57ae896.zip
first implementation of multiple states (reentrant code).
Diffstat (limited to '')
-rw-r--r--ltm.h16
1 files changed, 8 insertions, 8 deletions
diff --git a/ltm.h b/ltm.h
index dda28a5a..fde74b84 100644
--- a/ltm.h
+++ b/ltm.h
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ltm.h,v 1.6 1999/08/16 20:52:00 roberto Exp roberto $ 2** $Id: ltm.h,v 1.7 1999/09/20 14:57:29 roberto Exp roberto $
3** Tag methods 3** Tag methods
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -44,18 +44,18 @@ struct IM {
44}; 44};
45 45
46 46
47#define luaT_getim(tag,event) (&L->IMtable[-(tag)].int_method[event]) 47#define luaT_getim(L,tag,event) (&L->IMtable[-(tag)].int_method[event])
48#define luaT_getimbyObj(o,e) (luaT_getim(luaT_effectivetag(o),(e))) 48#define luaT_getimbyObj(L,o,e) (luaT_getim(L, luaT_effectivetag(o),(e)))
49 49
50extern const char *const luaT_eventname[]; 50extern const char *const luaT_eventname[];
51 51
52 52
53void luaT_init (void); 53void luaT_init (lua_State *L);
54void luaT_realtag (int tag); 54void luaT_realtag (lua_State *L, int tag);
55int luaT_effectivetag (const TObject *o); 55int luaT_effectivetag (const TObject *o);
56void luaT_settagmethod (int t, const char *event, TObject *func); 56void luaT_settagmethod (lua_State *L, int t, const char *event, TObject *func);
57const TObject *luaT_gettagmethod (int t, const char *event); 57const TObject *luaT_gettagmethod (lua_State *L, int t, const char *event);
58const char *luaT_travtagmethods (int (*fn)(TObject *)); 58const char *luaT_travtagmethods (lua_State *L, int (*fn)(lua_State *, TObject *));
59 59
60int luaT_validevent (int t, int e); 60int luaT_validevent (int t, int e);
61 61