diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-01-15 09:36:28 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-01-15 09:36:28 -0200 |
commit | dea400bc1d2854ac26c13f1866c226d9a54ea23f (patch) | |
tree | 40c94ca78868730bb12cb4767b239af62186fe13 | |
parent | fb663f768d6d19bdbf6c2ef800657a027a126c24 (diff) | |
download | lua-dea400bc1d2854ac26c13f1866c226d9a54ea23f.tar.gz lua-dea400bc1d2854ac26c13f1866c226d9a54ea23f.tar.bz2 lua-dea400bc1d2854ac26c13f1866c226d9a54ea23f.zip |
"getstack" returns func, too.
-rw-r--r-- | ldblib.c | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldblib.c,v 1.1 1999/01/08 16:47:44 roberto Exp roberto $ | 2 | ** $Id: ldblib.c,v 1.2 1999/01/11 18:57:35 roberto Exp roberto $ |
3 | ** Interface from Lua to its debug API | 3 | ** Interface from Lua to its debug API |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -68,6 +68,10 @@ static void getstack (void) { | |||
68 | if (currline > 0) | 68 | if (currline > 0) |
69 | settabsi(result, "current", currline); | 69 | settabsi(result, "current", currline); |
70 | lua_pushobject(result); | 70 | lua_pushobject(result); |
71 | lua_pushstring("func"); | ||
72 | lua_pushobject(func); | ||
73 | lua_settable(); /* result.func = func */ | ||
74 | lua_pushobject(result); | ||
71 | } | 75 | } |
72 | } | 76 | } |
73 | 77 | ||