fallback for "call expression not a function" errors

This commit is contained in:
Roberto Ierusalimschy
1994-11-21 16:22:58 -02:00
parent 96ea2e0fb4
commit 609392ff2e
3 changed files with 29 additions and 7 deletions

View File

@@ -3,7 +3,7 @@
** TecCGraf - PUC-Rio
*/
char *rcs_fallback="$Id: fallback.c,v 1.7 1994/11/18 19:46:21 roberto Exp roberto $";
char *rcs_fallback="$Id: fallback.c,v 1.8 1994/11/21 13:30:15 roberto Exp roberto $";
#include <stdio.h>
@@ -21,6 +21,7 @@ static void arithFB (void);
static void concatFB (void);
static void orderFB (void);
static void GDFB (void);
static void funcFB (void);
/*
@@ -34,7 +35,8 @@ struct FB luaI_fallBacks[] = {
{"order", {LUA_T_CFUNCTION, orderFB}},
{"concat", {LUA_T_CFUNCTION, concatFB}},
{"settable", {LUA_T_CFUNCTION, gettableFB}},
{"gc", {LUA_T_CFUNCTION, GDFB}}
{"gc", {LUA_T_CFUNCTION, GDFB}},
{"function", {LUA_T_CFUNCTION, funcFB}}
};
#define N_FB (sizeof(luaI_fallBacks)/sizeof(struct FB))
@@ -103,6 +105,11 @@ static void orderFB (void)
static void GDFB (void) { }
static void funcFB (void)
{
lua_reportbug("call expression not a function");
}
/*
** Lock routines