aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lapi.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/lapi.c b/lapi.c
index 98b6e213..160459d8 100644
--- a/lapi.c
+++ b/lapi.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lapi.c,v 1.40 1999/03/01 17:49:04 roberto Exp roberto $ 2** $Id: lapi.c,v 1.41 1999/03/04 21:17:26 roberto Exp roberto $
3** Lua API 3** Lua API
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -620,10 +620,10 @@ static int checkfunc (TObject *o)
620char *lua_getobjname (lua_Object o, char **name) 620char *lua_getobjname (lua_Object o, char **name)
621{ /* try to find a name for given function */ 621{ /* try to find a name for given function */
622 set_normalized(L->stack.top, Address(o)); /* to be accessed by "checkfunc" */ 622 set_normalized(L->stack.top, Address(o)); /* to be accessed by "checkfunc" */
623 if ((*name = luaT_travtagmethods(checkfunc)) != NULL) 623 if ((*name = luaS_travsymbol(checkfunc)) != NULL)
624 return "tag-method";
625 else if ((*name = luaS_travsymbol(checkfunc)) != NULL)
626 return "global"; 624 return "global";
625 else if ((*name = luaT_travtagmethods(checkfunc)) != NULL)
626 return "tag-method";
627 else return ""; 627 else return "";
628} 628}
629 629