diff options
| -rw-r--r-- | ltests.c | 8 |
1 files changed, 7 insertions, 1 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltests.c,v 1.1 2001/11/29 22:14:34 rieru Exp rieru $ | 2 | ** $Id: ltests.c,v 1.109 2002/02/14 21:42:22 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 | */ |
| @@ -561,9 +561,15 @@ static int testC (lua_State *L) { | |||
| 561 | else if EQ("pushnum") { | 561 | else if EQ("pushnum") { |
| 562 | lua_pushnumber(L, getnum); | 562 | lua_pushnumber(L, getnum); |
| 563 | } | 563 | } |
| 564 | else if EQ("pushnil") { | ||
| 565 | lua_pushnil(L); | ||
| 566 | } | ||
| 564 | else if EQ("pushbool") { | 567 | else if EQ("pushbool") { |
| 565 | lua_pushboolean(L, getnum); | 568 | lua_pushboolean(L, getnum); |
| 566 | } | 569 | } |
| 570 | else if EQ("tobool") { | ||
| 571 | lua_pushnumber(L, lua_toboolean(L, getnum)); | ||
| 572 | } | ||
| 567 | else if EQ("pushvalue") { | 573 | else if EQ("pushvalue") { |
| 568 | lua_pushvalue(L, getnum); | 574 | lua_pushvalue(L, getnum); |
| 569 | } | 575 | } |
