diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2013-05-07 16:01:16 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2013-05-07 16:01:16 -0300 |
| commit | 0ce301810960e77498afb58063a40b125a31f908 (patch) | |
| tree | 59a714d1909c578bf608a1d39547444fb0bcea20 | |
| parent | 0233ce08151e1f826fed3d0c3bc13da05c277811 (diff) | |
| download | lua-0ce301810960e77498afb58063a40b125a31f908.tar.gz lua-0ce301810960e77498afb58063a40b125a31f908.tar.bz2 lua-0ce301810960e77498afb58063a40b125a31f908.zip | |
'pushnum' pushes a "number" (float) + new C instruction 'pushint'
| -rw-r--r-- | ltests.c | 5 |
1 files changed, 4 insertions, 1 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltests.c,v 2.136 2013/04/24 19:41:48 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 2.137 2013/04/26 13:07:53 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 | */ |
| @@ -1109,6 +1109,9 @@ static int runC (lua_State *L, lua_State *L1, const char *pc) { | |||
| 1109 | lua_pop(L1, getnum); | 1109 | lua_pop(L1, getnum); |
| 1110 | } | 1110 | } |
| 1111 | else if EQ("pushnum") { | 1111 | else if EQ("pushnum") { |
| 1112 | lua_pushnumber(L1, (lua_Number)getnum); | ||
| 1113 | } | ||
| 1114 | else if EQ("pushint") { | ||
| 1112 | lua_pushinteger(L1, getnum); | 1115 | lua_pushinteger(L1, getnum); |
| 1113 | } | 1116 | } |
| 1114 | else if EQ("pushstring") { | 1117 | else if EQ("pushstring") { |
