diff options
-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.105 2010/05/10 18:24:36 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 2.106 2010/05/11 20:48:36 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 | */ |
@@ -992,6 +992,9 @@ static int runC (lua_State *L, lua_State *L1, const char *pc) { | |||
992 | for (;;) { | 992 | for (;;) { |
993 | const char *inst = getstring; | 993 | const char *inst = getstring; |
994 | if EQ("") return 0; | 994 | if EQ("") return 0; |
995 | else if EQ("absindex") { | ||
996 | lua_pushnumber(L1, lua_absindex(L1, getindex)); | ||
997 | } | ||
995 | else if EQ("isnumber") { | 998 | else if EQ("isnumber") { |
996 | lua_pushboolean(L1, lua_isnumber(L1, getindex)); | 999 | lua_pushboolean(L1, lua_isnumber(L1, getindex)); |
997 | } | 1000 | } |