diff options
| -rw-r--r-- | table.c | 8 |
1 files changed, 4 insertions, 4 deletions
| @@ -3,7 +3,7 @@ | |||
| 3 | ** Module to control static tables | 3 | ** Module to control static tables |
| 4 | */ | 4 | */ |
| 5 | 5 | ||
| 6 | char *rcs_table="$Id: table.c,v 2.36 1995/10/23 13:53:48 roberto Exp roberto $"; | 6 | char *rcs_table="$Id: table.c,v 2.37 1995/10/26 14:21:56 roberto Exp roberto $"; |
| 7 | 7 | ||
| 8 | /*#include <string.h>*/ | 8 | /*#include <string.h>*/ |
| 9 | 9 | ||
| @@ -273,10 +273,10 @@ static int checkfunc (Object *o) | |||
| 273 | char *getobjname (lua_Object o, char **name) | 273 | char *getobjname (lua_Object o, char **name) |
| 274 | { /* try to find a name for given function */ | 274 | { /* try to find a name for given function */ |
| 275 | functofind = luaI_Address(o); | 275 | functofind = luaI_Address(o); |
| 276 | if ((*name = lua_travsymbol(checkfunc)) != NULL) | 276 | if ((*name = luaI_travfallbacks(checkfunc)) != NULL) |
| 277 | return "global"; | ||
| 278 | else if ((*name = luaI_travfallbacks(checkfunc)) != NULL) | ||
| 279 | return "fallback"; | 277 | return "fallback"; |
| 278 | else if ((*name = lua_travsymbol(checkfunc)) != NULL) | ||
| 279 | return "global"; | ||
| 280 | else return ""; | 280 | else return ""; |
| 281 | } | 281 | } |
| 282 | 282 | ||
