diff options
Diffstat (limited to 'ltests.c')
-rw-r--r-- | ltests.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ltests.c,v 1.86 2001/06/28 19:58:57 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 1.87 2001/07/05 20:31:14 roberto Exp roberto $ |
3 | ** Internal Module for Debugging of the Lua Implementation | 3 | ** Internal Module for Debugging of the Lua Implementation |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -367,8 +367,8 @@ static int udataval (lua_State *L) { | |||
367 | } | 367 | } |
368 | 368 | ||
369 | static int newtag (lua_State *L) { | 369 | static int newtag (lua_State *L) { |
370 | lua_pushnumber(L, lua_newxtype(L, lua_tostring(L, 1), | 370 | lua_pushnumber(L, lua_newtype(L, lua_tostring(L, 1), |
371 | (int)lua_tonumber(L, 2))); | 371 | (int)lua_tonumber(L, 2))); |
372 | return 1; | 372 | return 1; |
373 | } | 373 | } |
374 | 374 | ||
@@ -619,7 +619,7 @@ static int testC (lua_State *L) { | |||
619 | lua_gettagmethod(L, tag, event); | 619 | lua_gettagmethod(L, tag, event); |
620 | } | 620 | } |
621 | else if EQ(l_s("type")) { | 621 | else if EQ(l_s("type")) { |
622 | lua_pushstring(L, lua_typename(L, lua_type(L, getnum))); | 622 | lua_pushstring(L, lua_type(L, getnum)); |
623 | } | 623 | } |
624 | else luaL_verror(L, l_s("unknown instruction %.30s"), buff); | 624 | else luaL_verror(L, l_s("unknown instruction %.30s"), buff); |
625 | } | 625 | } |