diff options
| -rw-r--r-- | ldblib.c | 4 |
1 files changed, 3 insertions, 1 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldblib.c,v 1.19 2000/08/28 17:57:04 roberto Exp roberto $ | 2 | ** $Id: ldblib.c,v 1.20 2000/09/05 19:33:32 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 | */ |
| @@ -55,6 +55,8 @@ static int getinfo (lua_State *L) { | |||
| 55 | switch (*options) { | 55 | switch (*options) { |
| 56 | case 'S': | 56 | case 'S': |
| 57 | settabss(L, "source", ar.source); | 57 | settabss(L, "source", ar.source); |
| 58 | if (ar.source) | ||
| 59 | settabss(L, "short_src", ar.short_src); | ||
| 58 | settabsi(L, "linedefined", ar.linedefined); | 60 | settabsi(L, "linedefined", ar.linedefined); |
| 59 | settabss(L, "what", ar.what); | 61 | settabss(L, "what", ar.what); |
| 60 | break; | 62 | break; |
