lua

commit 88d7ffb0d0c7303ef1b766b1100e4220e775ab57
parent 47527d2d3ca6e235d06adf567246c2f3bd424f65
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Thu, 20 Mar 1997 16:20:03 -0300

luaI_type moved to fallback.c

Diffstat:
M
inout.c
 | 
30
+-----------------------------

1 file changed, 1 insertion(+), 29 deletions(-)
diff --git a/inout.c b/inout.c
@@ -5,7 +5,7 @@
 ** Also provides some predefined lua functions.
 */
 
-char *rcs_inout="$Id: inout.c,v 2.46 1997/03/17 17:01:10 roberto Exp roberto $";
+char *rcs_inout="$Id: inout.c,v 2.47 1997/03/19 19:41:10 roberto Exp roberto $";
 
 #include <stdio.h>
 #include <string.h>
@@ -161,34 +161,6 @@ static void luaI_print (void)
 }
 
 /*
-** Internal function: return an object type.
-*/
-static void luaI_type (void)
-{
-  lua_Object o = lua_getparam(1);
-  int t = lua_tag(o);
-  char *s;
-  if (t == LUA_T_NUMBER)
-    s = "number";
-  else if (lua_isstring(o))
-    s = "string";
-  else if (lua_istable(o))
-    s = "table";
-  else if (lua_isnil(o))
-    s = "nil";
-  else if (lua_isfunction(o))
-    s = "function";
-  else if (lua_isuserdata(o))
-    s = "userdata";
-  else {
-    lua_error("no parameter to function 'type'");
-    return; /* to avoid warnings */
-  }
-  lua_pushliteral(s);
-  lua_pushnumber(t);
-}
- 
-/*
 ** Internal function: convert an object to a number
 */
 static void lua_obj2number (void)