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 | ||
