From 69ba1ac44188c8c067a300c3a47c94318ea99973 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Fri, 14 May 2010 10:15:54 -0300
Subject: [PATCH] new "instruction" 'absindex'

---
 ltests.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/ltests.c b/ltests.c
index 12cd2de1..65dd7098 100644
--- a/ltests.c
+++ b/ltests.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ltests.c,v 2.105 2010/05/10 18:24:36 roberto Exp roberto $
+** $Id: ltests.c,v 2.106 2010/05/11 20:48:36 roberto Exp roberto $
 ** Internal Module for Debugging of the Lua Implementation
 ** See Copyright Notice in lua.h
 */
@@ -992,6 +992,9 @@ static int runC (lua_State *L, lua_State *L1, const char *pc) {
   for (;;) {
     const char *inst = getstring;
     if EQ("") return 0;
+    else if EQ("absindex") {
+      lua_pushnumber(L1, lua_absindex(L1, getindex));
+    }
     else if EQ("isnumber") {
       lua_pushboolean(L1, lua_isnumber(L1, getindex));
     }