From 4b91e9cde630573cb35bb20101eb74cf5cf79a27 Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Tue, 16 Sep 1997 16:25:59 -0300 Subject: Tag methods --- fallback.h | 64 -------------------------------------------------------------- 1 file changed, 64 deletions(-) delete mode 100644 fallback.h (limited to 'fallback.h') diff --git a/fallback.h b/fallback.h deleted file mode 100644 index 1e2ecc56..00000000 --- a/fallback.h +++ /dev/null @@ -1,64 +0,0 @@ -/* -** $Id: fallback.h,v 1.24 1997/07/03 22:06:06 roberto Exp $ -*/ - -#ifndef fallback_h -#define fallback_h - -#include "lua.h" -#include "opcode.h" - -/* -* WARNING: if you change the order of this enumeration, -* grep "ORDER IM" -*/ -typedef enum { - IM_GETTABLE = 0, - IM_SETTABLE, - IM_INDEX, - IM_GETGLOBAL, - IM_SETGLOBAL, - IM_ADD, - IM_SUB, - IM_MUL, - IM_DIV, - IM_POW, - IM_UNM, - IM_LT, - IM_LE, - IM_GT, - IM_GE, - IM_CONCAT, - IM_GC, - IM_FUNCTION -} IMS; - -#define IM_N 18 - - -extern struct IM { - TObject int_method[IM_N]; -} *luaI_IMtable; - -extern char *luaI_eventname[]; - -#define luaI_getim(tag,event) (&luaI_IMtable[-(tag)].int_method[event]) -#define luaI_getimbyObj(o,e) (luaI_getim(luaI_efectivetag(o),(e))) - -void luaI_setfallback (void); -int luaI_ref (TObject *object, int lock); -TObject *luaI_getref (int ref); -void luaI_travlock (int (*fn)(TObject *)); -void luaI_invalidaterefs (void); -char *luaI_travfallbacks (int (*fn)(TObject *)); - -void luaI_settag (int tag, TObject *o); -void luaI_realtag (int tag); -int luaI_efectivetag (TObject *o); -void luaI_settagmethod (void); -void luaI_gettagmethod (void); -void luaI_seterrormethod (void); -void luaI_initfallbacks (void); - -#endif - -- cgit v1.2.3-55-g6feb