lua

commit dea400bc1d2854ac26c13f1866c226d9a54ea23f
parent fb663f768d6d19bdbf6c2ef800657a027a126c24
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Fri, 15 Jan 1999 09:36:06 -0200

"getstack" returns func, too.

Diffstat:
M
ldblib.c
 | 
6
+++++-

1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/ldblib.c b/ldblib.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ldblib.c,v 1.1 1999/01/08 16:47:44 roberto Exp roberto $
+** $Id: ldblib.c,v 1.2 1999/01/11 18:57:35 roberto Exp roberto $
 ** Interface from Lua to its debug API
 ** See Copyright Notice in lua.h
 */
@@ -68,6 +68,10 @@ static void getstack (void) {
     if (currline > 0)
       settabsi(result, "current", currline);
     lua_pushobject(result);
+    lua_pushstring("func");
+    lua_pushobject(func);
+    lua_settable();  /* result.func = func */
+    lua_pushobject(result);
   }
 }