`luaT_validevent' is exported, because compatibility module for fallbacks

uses it.
This commit is contained in:
Roberto Ierusalimschy 2000-03-30 13:41:51 -03:00
parent a69356e9e0
commit e2c60eda16
2 changed files with 4 additions and 3 deletions

4
ltm.c
View File

@ -1,5 +1,5 @@
/*
** $Id: ltm.c,v 1.37 2000/03/27 20:10:21 roberto Exp roberto $
** $Id: ltm.c,v 1.38 2000/03/29 20:19:20 roberto Exp roberto $
** Tag methods
** See Copyright Notice in lua.h
*/
@ -52,7 +52,7 @@ static const char luaT_validevents[NUM_TAGS][IM_N] = {
{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1} /* TAG_NIL */
};
static int luaT_validevent (int t, int e) { /* ORDER LUA_T */
int luaT_validevent (int t, int e) { /* ORDER LUA_T */
return (t > TAG_NIL) ? 1 : luaT_validevents[t][e];
}

3
ltm.h
View File

@ -1,5 +1,5 @@
/*
** $Id: ltm.h,v 1.10 2000/03/03 14:58:26 roberto Exp roberto $
** $Id: ltm.h,v 1.11 2000/03/20 19:14:54 roberto Exp roberto $
** Tag methods
** See Copyright Notice in lua.h
*/
@ -52,6 +52,7 @@ int luaT_effectivetag (lua_State *L, const TObject *o);
void luaT_settagmethod (lua_State *L, int t, const char *event, TObject *func);
const TObject *luaT_gettagmethod (lua_State *L, int t, const char *event);
const char *luaT_travtagmethods (lua_State *L, int (*fn)(lua_State *, TObject *));
int luaT_validevent (int t, int e); /* used by compatibility module */
#endif