in 'testC', booleans should be represented by booean values
This commit is contained in:
22
ltests.c
22
ltests.c
@@ -1,5 +1,5 @@
|
|||||||
/*
|
/*
|
||||||
** $Id: ltests.c,v 2.44 2007/11/12 16:28:45 roberto Exp roberto $
|
** $Id: ltests.c,v 2.45 2008/02/11 18:04:26 roberto Exp roberto $
|
||||||
** Internal Module for Debugging of the Lua Implementation
|
** Internal Module for Debugging of the Lua Implementation
|
||||||
** See Copyright Notice in lua.h
|
** See Copyright Notice in lua.h
|
||||||
*/
|
*/
|
||||||
@@ -861,31 +861,31 @@ static int testC (lua_State *L) {
|
|||||||
const char *inst = getname;
|
const char *inst = getname;
|
||||||
if EQ("") return 0;
|
if EQ("") return 0;
|
||||||
else if EQ("isnumber") {
|
else if EQ("isnumber") {
|
||||||
lua_pushinteger(L1, lua_isnumber(L1, getindex));
|
lua_pushboolean(L1, lua_isnumber(L1, getindex));
|
||||||
}
|
}
|
||||||
else if EQ("isstring") {
|
else if EQ("isstring") {
|
||||||
lua_pushinteger(L1, lua_isstring(L1, getindex));
|
lua_pushboolean(L1, lua_isstring(L1, getindex));
|
||||||
}
|
}
|
||||||
else if EQ("istable") {
|
else if EQ("istable") {
|
||||||
lua_pushinteger(L1, lua_istable(L1, getindex));
|
lua_pushboolean(L1, lua_istable(L1, getindex));
|
||||||
}
|
}
|
||||||
else if EQ("iscfunction") {
|
else if EQ("iscfunction") {
|
||||||
lua_pushinteger(L1, lua_iscfunction(L1, getindex));
|
lua_pushboolean(L1, lua_iscfunction(L1, getindex));
|
||||||
}
|
}
|
||||||
else if EQ("isfunction") {
|
else if EQ("isfunction") {
|
||||||
lua_pushinteger(L1, lua_isfunction(L1, getindex));
|
lua_pushboolean(L1, lua_isfunction(L1, getindex));
|
||||||
}
|
}
|
||||||
else if EQ("isuserdata") {
|
else if EQ("isuserdata") {
|
||||||
lua_pushinteger(L1, lua_isuserdata(L1, getindex));
|
lua_pushboolean(L1, lua_isuserdata(L1, getindex));
|
||||||
}
|
}
|
||||||
else if EQ("isudataval") {
|
else if EQ("isudataval") {
|
||||||
lua_pushinteger(L1, lua_islightuserdata(L1, getindex));
|
lua_pushboolean(L1, lua_islightuserdata(L1, getindex));
|
||||||
}
|
}
|
||||||
else if EQ("isnil") {
|
else if EQ("isnil") {
|
||||||
lua_pushinteger(L1, lua_isnil(L1, getindex));
|
lua_pushboolean(L1, lua_isnil(L1, getindex));
|
||||||
}
|
}
|
||||||
else if EQ("isnull") {
|
else if EQ("isnull") {
|
||||||
lua_pushinteger(L1, lua_isnone(L1, getindex));
|
lua_pushboolean(L1, lua_isnone(L1, getindex));
|
||||||
}
|
}
|
||||||
else if EQ("tonumber") {
|
else if EQ("tonumber") {
|
||||||
lua_pushnumber(L1, lua_tonumber(L1, getindex));
|
lua_pushnumber(L1, lua_tonumber(L1, getindex));
|
||||||
@@ -932,7 +932,7 @@ static int testC (lua_State *L) {
|
|||||||
lua_newuserdata(L1, getnum);
|
lua_newuserdata(L1, getnum);
|
||||||
}
|
}
|
||||||
else if EQ("tobool") {
|
else if EQ("tobool") {
|
||||||
lua_pushinteger(L1, lua_toboolean(L1, getindex));
|
lua_pushboolean(L1, lua_toboolean(L1, getindex));
|
||||||
}
|
}
|
||||||
else if EQ("pushvalue") {
|
else if EQ("pushvalue") {
|
||||||
lua_pushvalue(L1, getindex);
|
lua_pushvalue(L1, getindex);
|
||||||
|
|||||||
Reference in New Issue
Block a user