1/* 2** $Id: ltm.h,v 2.11 2011/02/28 17:32:10 roberto Exp $ 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" 17*/ 18typedef 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_DIV, 29 TM_MOD, 30 TM_POW, 31 TM_UNM, 32 TM_LT, 33 TM_LE, 34 TM_CONCAT, 35 TM_CALL, 36 TM_N /* number of elements in the enum */ 37} TMS; 38 39 40 41#define gfasttm(g,et,e) ((et) == NULL ? NULL : \ 42 ((et)->flags & (1u<<(e))) ? NULL : luaT_gettm(et, e, (g)->tmname[e])) 43 44#define fasttm(l,et,e) gfasttm(G(l), et, e) 45 46#define ttypename(x) luaT_typenames_[(x) + 1] 47#define objtypename(x) ttypename(ttypenv(x)) 48 49LUAI_DDEC const char *const luaT_typenames_[LUA_TOTALTAGS]; 50 51 52LUAI_FUNC const TValue *luaT_gettm (Table *events, TMS event, TString *ename); 53LUAI_FUNC const TValue *luaT_gettmbyobj (lua_State *L, const TValue *o, 54 TMS event); 55LUAI_FUNC void luaT_init (lua_State *L); 56 57#endif 58