From 68f337dfa617732646a4a974eb33b25daf45a1e2 Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Wed, 4 Oct 1995 14:13:02 -0300 Subject: Garbage collection of functions + header structure for functions --- inout.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'inout.c') diff --git a/inout.c b/inout.c index afb0ee52..cfcd224e 100644 --- a/inout.c +++ b/inout.c @@ -5,7 +5,7 @@ ** Also provides some predefined lua functions. */ -char *rcs_inout="$Id: inout.c,v 2.19 1995/05/02 18:43:03 roberto Exp roberto $"; +char *rcs_inout="$Id: inout.c,v 2.20 1995/05/16 17:23:58 roberto Exp $"; #include #include @@ -222,7 +222,7 @@ void lua_print (void) { if (lua_isnumber(obj)) printf("%g\n",lua_getnumber(obj)); else if (lua_isstring(obj)) printf("%s\n",lua_getstring(obj)); - else if (lua_isfunction(obj)) printf("function: %p\n",bvalue(luaI_Address(obj))); + else if (lua_isfunction(obj)) printf("function: %p\n",(luaI_Address(obj))->value.tf); else if (lua_iscfunction(obj)) printf("cfunction: %p\n",lua_getcfunction(obj) ); else if (lua_isuserdata(obj)) printf("userdata: %p\n",lua_getuserdata(obj)); -- cgit v1.2.3-55-g6feb