diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-09-25 13:22:42 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-09-25 13:22:42 -0300 |
| commit | 13635f7de7c51b26c447ce444a2c045cba83fe7c (patch) | |
| tree | b9461626b368e8ca1161b01e2771447898fdecd8 /ltests.c | |
| parent | d8a442206d2845e1749cc36dd59208428ef1d117 (diff) | |
| download | lua-13635f7de7c51b26c447ce444a2c045cba83fe7c.tar.gz lua-13635f7de7c51b26c447ce444a2c045cba83fe7c.tar.bz2 lua-13635f7de7c51b26c447ce444a2c045cba83fe7c.zip | |
new version of protected execution
Diffstat (limited to 'ltests.c')
| -rw-r--r-- | ltests.c | 12 |
1 files changed, 10 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltests.c,v 1.42 2000/09/14 14:09:31 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 1.43 2000/09/25 14:48:42 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 | */ |
| @@ -422,11 +422,19 @@ static int testC (lua_State *L) { | |||
| 422 | else if EQ("concat") { | 422 | else if EQ("concat") { |
| 423 | lua_concat(L, getnum); | 423 | lua_concat(L, getnum); |
| 424 | } | 424 | } |
| 425 | else if EQ("call") { | 425 | else if EQ("rawcall") { |
| 426 | int narg = getnum; | 426 | int narg = getnum; |
| 427 | int nres = getnum; | 427 | int nres = getnum; |
| 428 | lua_rawcall(L, narg, nres); | 428 | lua_rawcall(L, narg, nres); |
| 429 | } | 429 | } |
| 430 | else if EQ("call") { | ||
| 431 | int narg = getnum; | ||
| 432 | int nres = getnum; | ||
| 433 | lua_call(L, narg, nres); | ||
| 434 | } | ||
| 435 | else if EQ("dostring") { | ||
| 436 | lua_dostring(L, luaL_check_string(L, getnum)); | ||
| 437 | } | ||
| 430 | else if EQ("type") { | 438 | else if EQ("type") { |
| 431 | lua_pushstring(L, lua_type(L, getnum)); | 439 | lua_pushstring(L, lua_type(L, getnum)); |
| 432 | } | 440 | } |
