diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-03-31 17:59:09 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-03-31 17:59:09 -0300 |
commit | efaaf99c425db615e63b6c5ee56c2878a592e2fa (patch) | |
tree | d8d027e29e98d982b67f645e42fa38c0cc2bde32 /fallback.h | |
parent | f8a571ee356f386ed7b5af898c2d297fd6d295fd (diff) | |
download | lua-efaaf99c425db615e63b6c5ee56c2878a592e2fa.tar.gz lua-efaaf99c425db615e63b6c5ee56c2878a592e2fa.tar.bz2 lua-efaaf99c425db615e63b6c5ee56c2878a592e2fa.zip |
first version of "setglobal" and "getglobal" internal methods.
Diffstat (limited to 'fallback.h')
-rw-r--r-- | fallback.h | 22 |
1 files changed, 6 insertions, 16 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: fallback.h,v 1.17 1997/03/24 17:13:22 roberto Exp roberto $ | 2 | ** $Id: fallback.h,v 1.18 1997/03/31 14:02:58 roberto Exp roberto $ |
3 | */ | 3 | */ |
4 | 4 | ||
5 | #ifndef fallback_h | 5 | #ifndef fallback_h |
@@ -16,6 +16,8 @@ typedef enum { | |||
16 | IM_GETTABLE = 0, | 16 | IM_GETTABLE = 0, |
17 | IM_SETTABLE, | 17 | IM_SETTABLE, |
18 | IM_INDEX, | 18 | IM_INDEX, |
19 | IM_GETGLOBAL, | ||
20 | IM_SETGLOBAL, | ||
19 | IM_ADD, | 21 | IM_ADD, |
20 | IM_SUB, | 22 | IM_SUB, |
21 | IM_MUL, | 23 | IM_MUL, |
@@ -31,23 +33,11 @@ typedef enum { | |||
31 | IM_FUNCTION | 33 | IM_FUNCTION |
32 | } IMS; | 34 | } IMS; |
33 | 35 | ||
34 | #define IM_N 16 | 36 | #define IM_N 18 |
35 | 37 | ||
36 | extern char *luaI_eventname[]; | 38 | extern char *luaI_eventname[]; |
37 | 39 | ||
38 | 40 | ||
39 | /* | ||
40 | * WARNING: if you change the order of this enumeration, | ||
41 | * grep "ORDER GIM" | ||
42 | */ | ||
43 | typedef enum { | ||
44 | GIM_ERROR = 0, | ||
45 | GIM_GETGLOBAL, | ||
46 | GIM_SETGLOBAL | ||
47 | } IMGS; | ||
48 | |||
49 | #define GIM_N 3 | ||
50 | |||
51 | void luaI_setfallback (void); | 41 | void luaI_setfallback (void); |
52 | int luaI_ref (TObject *object, int lock); | 42 | int luaI_ref (TObject *object, int lock); |
53 | TObject *luaI_getref (int ref); | 43 | TObject *luaI_getref (int ref); |
@@ -60,10 +50,10 @@ void luaI_settag (int tag, TObject *o); | |||
60 | lua_Type luaI_typetag (int tag); | 50 | lua_Type luaI_typetag (int tag); |
61 | TObject *luaI_getim (int tag, IMS event); | 51 | TObject *luaI_getim (int tag, IMS event); |
62 | #define luaI_getimbyObj(o,e) (luaI_getim(luaI_tag(o),(e))) | 52 | #define luaI_getimbyObj(o,e) (luaI_getim(luaI_tag(o),(e))) |
63 | TObject *luaI_getgim (IMGS event); | 53 | TObject *luaI_geterrorim (void); |
64 | int luaI_tag (TObject *o); | 54 | int luaI_tag (TObject *o); |
65 | void luaI_setintmethod (void); | 55 | void luaI_setintmethod (void); |
66 | void luaI_setglobalmethod (void); | 56 | void luaI_seterrormethod (void); |
67 | void luaI_initfallbacks (void); | 57 | void luaI_initfallbacks (void); |
68 | 58 | ||
69 | #endif | 59 | #endif |