diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-03-20 16:14:54 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-03-20 16:14:54 -0300 |
| commit | bb9605bbc954d53b7d5997c53fceafe4450a6917 (patch) | |
| tree | f62d6f64623221e2ba807aa080b84f2572640975 /ltm.h | |
| parent | 67592998809bf5816e2256409b384a712270c7b2 (diff) | |
| download | lua-bb9605bbc954d53b7d5997c53fceafe4450a6917.tar.gz lua-bb9605bbc954d53b7d5997c53fceafe4450a6917.tar.bz2 lua-bb9605bbc954d53b7d5997c53fceafe4450a6917.zip | |
tags can be positive values
Diffstat (limited to 'ltm.h')
| -rw-r--r-- | ltm.h | 9 |
1 files changed, 4 insertions, 5 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltm.h,v 1.9 2000/02/22 18:12:46 roberto Exp roberto $ | 2 | ** $Id: ltm.h,v 1.10 2000/03/03 14:58:26 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 | */ |
| @@ -40,19 +40,18 @@ struct IM { | |||
| 40 | }; | 40 | }; |
| 41 | 41 | ||
| 42 | 42 | ||
| 43 | #define luaT_getim(L,tag,event) (&L->IMtable[-(tag)].int_method[event]) | 43 | #define luaT_getim(L,tag,event) (&L->IMtable[tag].int_method[event]) |
| 44 | #define luaT_getimbyObj(L,o,e) (luaT_getim(L, luaT_effectivetag(o),(e))) | 44 | #define luaT_getimbyObj(L,o,e) (luaT_getim(L, luaT_effectivetag(L, o),(e))) |
| 45 | 45 | ||
| 46 | extern const char *const luaT_eventname[]; | 46 | extern const char *const luaT_eventname[]; |
| 47 | 47 | ||
| 48 | 48 | ||
| 49 | void luaT_init (lua_State *L); | 49 | void luaT_init (lua_State *L); |
| 50 | void luaT_realtag (lua_State *L, int tag); | 50 | void luaT_realtag (lua_State *L, int tag); |
| 51 | int luaT_effectivetag (const TObject *o); | 51 | int luaT_effectivetag (lua_State *L, const TObject *o); |
| 52 | void luaT_settagmethod (lua_State *L, int t, const char *event, TObject *func); | 52 | void luaT_settagmethod (lua_State *L, int t, const char *event, TObject *func); |
| 53 | const TObject *luaT_gettagmethod (lua_State *L, int t, const char *event); | 53 | const TObject *luaT_gettagmethod (lua_State *L, int t, const char *event); |
| 54 | const char *luaT_travtagmethods (lua_State *L, int (*fn)(lua_State *, TObject *)); | 54 | const char *luaT_travtagmethods (lua_State *L, int (*fn)(lua_State *, TObject *)); |
| 55 | 55 | ||
| 56 | int luaT_validevent (int t, int e); | ||
| 57 | 56 | ||
| 58 | #endif | 57 | #endif |