diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1996-03-19 19:28:37 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1996-03-19 19:28:37 -0300 |
| commit | a275d9a25b161af426696d7b73d46f91150309c9 (patch) | |
| tree | 763a5694213fe30b231bc81777cec71828935696 /fallback.c | |
| parent | 7e0be1fbde80d72886e11bcbf114a8dbf6d5e1d9 (diff) | |
| download | lua-a275d9a25b161af426696d7b73d46f91150309c9.tar.gz lua-a275d9a25b161af426696d7b73d46f91150309c9.tar.bz2 lua-a275d9a25b161af426696d7b73d46f91150309c9.zip | |
functions "lua_is..." consider coercions.
Diffstat (limited to 'fallback.c')
| -rw-r--r-- | fallback.c | 4 |
1 files changed, 2 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.20 1996/02/22 20:34:33 roberto Exp roberto $"; | 6 | char *rcs_fallback="$Id: fallback.c,v 1.21 1996/03/04 13:29:10 roberto Exp roberto $"; |
| 7 | 7 | ||
| 8 | #include <stdio.h> | 8 | #include <stdio.h> |
| 9 | #include <string.h> | 9 | #include <string.h> |
| @@ -49,7 +49,7 @@ void luaI_setfallback (void) | |||
| 49 | int i; | 49 | int i; |
| 50 | char *name = lua_getstring(lua_getparam(1)); | 50 | char *name = lua_getstring(lua_getparam(1)); |
| 51 | lua_Object func = lua_getparam(2); | 51 | lua_Object func = lua_getparam(2); |
| 52 | if (name == NULL || !(lua_isfunction(func) || lua_iscfunction(func))) | 52 | if (name == NULL || !lua_isfunction(func)) |
| 53 | lua_error("incorrect argument to function `setfallback'"); | 53 | lua_error("incorrect argument to function `setfallback'"); |
| 54 | for (i=0; i<N_FB; i++) | 54 | for (i=0; i<N_FB; i++) |
| 55 | { | 55 | { |