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