diff options
Diffstat (limited to 'lbuiltin.c')
-rw-r--r-- | lbuiltin.c | 16 |
1 files changed, 8 insertions, 8 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lbuiltin.c,v 1.63 1999/09/20 14:57:29 roberto Exp roberto $ | 2 | ** $Id: lbuiltin.c,v 1.64 1999/10/04 17:51:04 roberto Exp roberto $ |
3 | ** Built-in functions | 3 | ** Built-in functions |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -247,6 +247,13 @@ static void luaB_collectgarbage (void) { | |||
247 | lua_pushnumber(lua_collectgarbage(luaL_opt_int(1, 0))); | 247 | lua_pushnumber(lua_collectgarbage(luaL_opt_int(1, 0))); |
248 | } | 248 | } |
249 | 249 | ||
250 | |||
251 | static void luaB_type (void) { | ||
252 | lua_Object o = luaL_nonnullarg(1); | ||
253 | lua_pushstring(lua_type(o)); | ||
254 | lua_pushnumber(lua_tag(o)); | ||
255 | } | ||
256 | |||
250 | /* }====================================================== */ | 257 | /* }====================================================== */ |
251 | 258 | ||
252 | 259 | ||
@@ -371,13 +378,6 @@ static void luaB_tostring (void) { | |||
371 | lua_pushstring(buff); | 378 | lua_pushstring(buff); |
372 | } | 379 | } |
373 | 380 | ||
374 | |||
375 | static void luaB_type (void) { | ||
376 | lua_Object o = luaL_nonnullarg(1); | ||
377 | lua_pushstring(luaO_typename(luaA_Address(o))); | ||
378 | lua_pushnumber(lua_tag(o)); | ||
379 | } | ||
380 | |||
381 | /* }====================================================== */ | 381 | /* }====================================================== */ |
382 | 382 | ||
383 | 383 | ||