diff options
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 |
