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