diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1994-11-21 16:22:58 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1994-11-21 16:22:58 -0200 |
commit | 609392ff2e02eb44fa48c8563faf5994fc55297c (patch) | |
tree | ae4d3a4094a795a3c04583895007f0d6119da52a /fallback.c | |
parent | 96ea2e0fb462789015824823801ba34782364b68 (diff) | |
download | lua-609392ff2e02eb44fa48c8563faf5994fc55297c.tar.gz lua-609392ff2e02eb44fa48c8563faf5994fc55297c.tar.bz2 lua-609392ff2e02eb44fa48c8563faf5994fc55297c.zip |
fallback for "call expression not a function" errors
Diffstat (limited to 'fallback.c')
-rw-r--r-- | fallback.c | 11 |
1 files changed, 9 insertions, 2 deletions
@@ -3,7 +3,7 @@ | |||
3 | ** TecCGraf - PUC-Rio | 3 | ** TecCGraf - PUC-Rio |
4 | */ | 4 | */ |
5 | 5 | ||
6 | char *rcs_fallback="$Id: fallback.c,v 1.7 1994/11/18 19:46:21 roberto Exp roberto $"; | 6 | char *rcs_fallback="$Id: fallback.c,v 1.8 1994/11/21 13:30:15 roberto Exp roberto $"; |
7 | 7 | ||
8 | #include <stdio.h> | 8 | #include <stdio.h> |
9 | 9 | ||
@@ -21,6 +21,7 @@ static void arithFB (void); | |||
21 | static void concatFB (void); | 21 | static void concatFB (void); |
22 | static void orderFB (void); | 22 | static void orderFB (void); |
23 | static void GDFB (void); | 23 | static void GDFB (void); |
24 | static void funcFB (void); | ||
24 | 25 | ||
25 | 26 | ||
26 | /* | 27 | /* |
@@ -34,7 +35,8 @@ struct FB luaI_fallBacks[] = { | |||
34 | {"order", {LUA_T_CFUNCTION, orderFB}}, | 35 | {"order", {LUA_T_CFUNCTION, orderFB}}, |
35 | {"concat", {LUA_T_CFUNCTION, concatFB}}, | 36 | {"concat", {LUA_T_CFUNCTION, concatFB}}, |
36 | {"settable", {LUA_T_CFUNCTION, gettableFB}}, | 37 | {"settable", {LUA_T_CFUNCTION, gettableFB}}, |
37 | {"gc", {LUA_T_CFUNCTION, GDFB}} | 38 | {"gc", {LUA_T_CFUNCTION, GDFB}}, |
39 | {"function", {LUA_T_CFUNCTION, funcFB}} | ||
38 | }; | 40 | }; |
39 | 41 | ||
40 | #define N_FB (sizeof(luaI_fallBacks)/sizeof(struct FB)) | 42 | #define N_FB (sizeof(luaI_fallBacks)/sizeof(struct FB)) |
@@ -103,6 +105,11 @@ static void orderFB (void) | |||
103 | 105 | ||
104 | static void GDFB (void) { } | 106 | static void GDFB (void) { } |
105 | 107 | ||
108 | static void funcFB (void) | ||
109 | { | ||
110 | lua_reportbug("call expression not a function"); | ||
111 | } | ||
112 | |||
106 | 113 | ||
107 | /* | 114 | /* |
108 | ** Lock routines | 115 | ** Lock routines |