aboutsummaryrefslogtreecommitdiff
path: root/lapi.c
diff options
context:
space:
mode:
Diffstat (limited to 'lapi.c')
-rw-r--r--lapi.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/lapi.c b/lapi.c
index 464ef60a..5a3b0d26 100644
--- a/lapi.c
+++ b/lapi.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lapi.c,v 1.14 1997/12/15 16:17:20 roberto Exp roberto $ 2** $Id: lapi.c,v 1.15 1997/12/18 18:32:39 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*/
@@ -60,7 +60,7 @@ static void set_normalized (TObject *d, TObject *s)
60 60
61static TObject *luaA_protovalue (TObject *o) 61static TObject *luaA_protovalue (TObject *o)
62{ 62{
63 return (ttype(o) == LUA_T_CLOSURE) ? protovalue(o) : o; 63 return (normalized_type(o) == LUA_T_CLOSURE) ? protovalue(o) : o;
64} 64}
65 65
66 66
@@ -509,7 +509,7 @@ void lua_funcinfo (lua_Object func, char **filename, int *linedefined)
509 lua_error("API - `funcinfo' called with a non-function value"); 509 lua_error("API - `funcinfo' called with a non-function value");
510 else { 510 else {
511 TObject *f = luaA_protovalue(Address(func)); 511 TObject *f = luaA_protovalue(Address(func));
512 if (ttype(f) == LUA_T_PROTO) { 512 if (normalized_type(f) == LUA_T_PROTO) {
513 *filename = tfvalue(f)->fileName->str; 513 *filename = tfvalue(f)->fileName->str;
514 *linedefined = tfvalue(f)->lineDefined; 514 *linedefined = tfvalue(f)->lineDefined;
515 } 515 }