dfhack/depends/lua/include/ltm.h

77 lines
1.7 KiB
C

2011-08-08 15:19:44 -06:00
/*
2016-07-26 21:23:26 -06:00
** $Id: ltm.h,v 2.22 2016/02/26 19:20:15 roberto Exp $
2011-08-08 15:19:44 -06:00
** Tag methods
** See Copyright Notice in lua.h
*/
#ifndef ltm_h
#define ltm_h
#include "lobject.h"
/*
* WARNING: if you change the order of this enumeration,
2016-07-26 21:23:26 -06:00
* grep "ORDER TM" and "ORDER OP"
2011-08-08 15:19:44 -06:00
*/
typedef enum {
TM_INDEX,
TM_NEWINDEX,
TM_GC,
TM_MODE,
TM_LEN,
2016-07-26 21:23:26 -06:00
TM_EQ, /* last tag method with fast access */
2011-08-08 15:19:44 -06:00
TM_ADD,
TM_SUB,
TM_MUL,
TM_MOD,
TM_POW,
2016-07-26 21:23:26 -06:00
TM_DIV,
TM_IDIV,
TM_BAND,
TM_BOR,
TM_BXOR,
TM_SHL,
TM_SHR,
2011-08-08 15:19:44 -06:00
TM_UNM,
2016-07-26 21:23:26 -06:00
TM_BNOT,
2011-08-08 15:19:44 -06:00
TM_LT,
TM_LE,
TM_CONCAT,
TM_CALL,
TM_N /* number of elements in the enum */
} TMS;
#define gfasttm(g,et,e) ((et) == NULL ? NULL : \
((et)->flags & (1u<<(e))) ? NULL : luaT_gettm(et, e, (g)->tmname[e]))
#define fasttm(l,et,e) gfasttm(G(l), et, e)
#define ttypename(x) luaT_typenames_[(x) + 1]
LUAI_DDEC const char *const luaT_typenames_[LUA_TOTALTAGS];
2011-08-08 15:19:44 -06:00
2016-07-26 21:23:26 -06:00
LUAI_FUNC const char *luaT_objtypename (lua_State *L, const TValue *o);
2011-08-08 15:19:44 -06:00
LUAI_FUNC const TValue *luaT_gettm (Table *events, TMS event, TString *ename);
LUAI_FUNC const TValue *luaT_gettmbyobj (lua_State *L, const TValue *o,
TMS event);
LUAI_FUNC void luaT_init (lua_State *L);
2016-07-26 21:23:26 -06:00
LUAI_FUNC void luaT_callTM (lua_State *L, const TValue *f, const TValue *p1,
const TValue *p2, TValue *p3, int hasres);
LUAI_FUNC int luaT_callbinTM (lua_State *L, const TValue *p1, const TValue *p2,
StkId res, TMS event);
LUAI_FUNC void luaT_trybinTM (lua_State *L, const TValue *p1, const TValue *p2,
StkId res, TMS event);
LUAI_FUNC int luaT_callorderTM (lua_State *L, const TValue *p1,
const TValue *p2, TMS event);
2011-08-08 15:19:44 -06:00
#endif