diff options
author | Li Jin <dragon-fly@qq.com> | 2021-04-21 09:36:25 +0800 |
---|---|---|
committer | Li Jin <dragon-fly@qq.com> | 2021-04-21 09:36:25 +0800 |
commit | b7bdf7d5d36825a1a750a74641f6d374dec5d67a (patch) | |
tree | 6b27eb6590e07c07f378305c51d0f5e0779faa83 /src/lua/ltm.h | |
parent | b86e5af605a170a3559df0165eac3cb6b665dc49 (diff) | |
download | yuescript-b7bdf7d5d36825a1a750a74641f6d374dec5d67a.tar.gz yuescript-b7bdf7d5d36825a1a750a74641f6d374dec5d67a.tar.bz2 yuescript-b7bdf7d5d36825a1a750a74641f6d374dec5d67a.zip |
adjust some folder levels.
Diffstat (limited to 'src/lua/ltm.h')
-rw-r--r-- | src/lua/ltm.h | 103 |
1 files changed, 0 insertions, 103 deletions
diff --git a/src/lua/ltm.h b/src/lua/ltm.h deleted file mode 100644 index 73b833c..0000000 --- a/src/lua/ltm.h +++ /dev/null | |||
@@ -1,103 +0,0 @@ | |||
1 | /* | ||
2 | ** $Id: ltm.h $ | ||
3 | ** Tag methods | ||
4 | ** See Copyright Notice in lua.h | ||
5 | */ | ||
6 | |||
7 | #ifndef ltm_h | ||
8 | #define ltm_h | ||
9 | |||
10 | |||
11 | #include "lobject.h" | ||
12 | |||
13 | |||
14 | /* | ||
15 | * WARNING: if you change the order of this enumeration, | ||
16 | * grep "ORDER TM" and "ORDER OP" | ||
17 | */ | ||
18 | typedef enum { | ||
19 | TM_INDEX, | ||
20 | TM_NEWINDEX, | ||
21 | TM_GC, | ||
22 | TM_MODE, | ||
23 | TM_LEN, | ||
24 | TM_EQ, /* last tag method with fast access */ | ||
25 | TM_ADD, | ||
26 | TM_SUB, | ||
27 | TM_MUL, | ||
28 | TM_MOD, | ||
29 | TM_POW, | ||
30 | TM_DIV, | ||
31 | TM_IDIV, | ||
32 | TM_BAND, | ||
33 | TM_BOR, | ||
34 | TM_BXOR, | ||
35 | TM_SHL, | ||
36 | TM_SHR, | ||
37 | TM_UNM, | ||
38 | TM_BNOT, | ||
39 | TM_LT, | ||
40 | TM_LE, | ||
41 | TM_CONCAT, | ||
42 | TM_CALL, | ||
43 | TM_CLOSE, | ||
44 | TM_N /* number of elements in the enum */ | ||
45 | } TMS; | ||
46 | |||
47 | |||
48 | /* | ||
49 | ** Mask with 1 in all fast-access methods. A 1 in any of these bits | ||
50 | ** in the flag of a (meta)table means the metatable does not have the | ||
51 | ** corresponding metamethod field. (Bit 7 of the flag is used for | ||
52 | ** 'isrealasize'.) | ||
53 | */ | ||
54 | #define maskflags (~(~0u << (TM_EQ + 1))) | ||
55 | |||
56 | |||
57 | /* | ||
58 | ** Test whether there is no tagmethod. | ||
59 | ** (Because tagmethods use raw accesses, the result may be an "empty" nil.) | ||
60 | */ | ||
61 | #define notm(tm) ttisnil(tm) | ||
62 | |||
63 | |||
64 | #define gfasttm(g,et,e) ((et) == NULL ? NULL : \ | ||
65 | ((et)->flags & (1u<<(e))) ? NULL : luaT_gettm(et, e, (g)->tmname[e])) | ||
66 | |||
67 | #define fasttm(l,et,e) gfasttm(G(l), et, e) | ||
68 | |||
69 | #define ttypename(x) luaT_typenames_[(x) + 1] | ||
70 | |||
71 | LUAI_DDEC(const char *const luaT_typenames_[LUA_TOTALTYPES];) | ||
72 | |||
73 | |||
74 | LUAI_FUNC const char *luaT_objtypename (lua_State *L, const TValue *o); | ||
75 | |||
76 | LUAI_FUNC const TValue *luaT_gettm (Table *events, TMS event, TString *ename); | ||
77 | LUAI_FUNC const TValue *luaT_gettmbyobj (lua_State *L, const TValue *o, | ||
78 | TMS event); | ||
79 | LUAI_FUNC void luaT_init (lua_State *L); | ||
80 | |||
81 | LUAI_FUNC void luaT_callTM (lua_State *L, const TValue *f, const TValue *p1, | ||
82 | const TValue *p2, const TValue *p3); | ||
83 | LUAI_FUNC void luaT_callTMres (lua_State *L, const TValue *f, | ||
84 | const TValue *p1, const TValue *p2, StkId p3); | ||
85 | LUAI_FUNC void luaT_trybinTM (lua_State *L, const TValue *p1, const TValue *p2, | ||
86 | StkId res, TMS event); | ||
87 | LUAI_FUNC void luaT_tryconcatTM (lua_State *L); | ||
88 | LUAI_FUNC void luaT_trybinassocTM (lua_State *L, const TValue *p1, | ||
89 | const TValue *p2, int inv, StkId res, TMS event); | ||
90 | LUAI_FUNC void luaT_trybiniTM (lua_State *L, const TValue *p1, lua_Integer i2, | ||
91 | int inv, StkId res, TMS event); | ||
92 | LUAI_FUNC int luaT_callorderTM (lua_State *L, const TValue *p1, | ||
93 | const TValue *p2, TMS event); | ||
94 | LUAI_FUNC int luaT_callorderiTM (lua_State *L, const TValue *p1, int v2, | ||
95 | int inv, int isfloat, TMS event); | ||
96 | |||
97 | LUAI_FUNC void luaT_adjustvarargs (lua_State *L, int nfixparams, | ||
98 | struct CallInfo *ci, const Proto *p); | ||
99 | LUAI_FUNC void luaT_getvarargs (lua_State *L, struct CallInfo *ci, | ||
100 | StkId where, int wanted); | ||
101 | |||
102 | |||
103 | #endif | ||