diff options
Diffstat (limited to 'ldebug.c')
-rw-r--r-- | ldebug.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldebug.c,v 2.41 2008/08/26 13:27:42 roberto Exp roberto $ | 2 | ** $Id: ldebug.c,v 2.42 2008/10/30 15:39:30 roberto Exp roberto $ |
3 | ** Debug Interface | 3 | ** Debug Interface |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -89,7 +89,7 @@ LUA_API int lua_getstack (lua_State *L, int level, lua_Debug *ar) { | |||
89 | for (ci = L->ci; level > 0 && ci > L->base_ci; ci--) { | 89 | for (ci = L->ci; level > 0 && ci > L->base_ci; ci--) { |
90 | level--; | 90 | level--; |
91 | if (isLua(ci)) /* Lua function? */ | 91 | if (isLua(ci)) /* Lua function? */ |
92 | level -= ci->tailcalls; /* skip lost tail calls */ | 92 | level -= ci->u.l.tailcalls; /* skip lost tail calls */ |
93 | } | 93 | } |
94 | if (level == 0 && ci > L->base_ci) { /* level found? */ | 94 | if (level == 0 && ci > L->base_ci) { /* level found? */ |
95 | status = 1; | 95 | status = 1; |
@@ -527,7 +527,7 @@ static const char *getobjname (lua_State *L, CallInfo *ci, int stackpos, | |||
527 | static const char *getfuncname (lua_State *L, CallInfo *ci, const char **name) { | 527 | static const char *getfuncname (lua_State *L, CallInfo *ci, const char **name) { |
528 | TMS tm = 0; | 528 | TMS tm = 0; |
529 | Instruction i; | 529 | Instruction i; |
530 | if ((isLua(ci) && ci->tailcalls > 0) || !isLua(ci - 1)) | 530 | if ((isLua(ci) && ci->u.l.tailcalls > 0) || !isLua(ci - 1)) |
531 | return NULL; /* calling function is not Lua (or is unknown) */ | 531 | return NULL; /* calling function is not Lua (or is unknown) */ |
532 | ci--; /* calling function */ | 532 | ci--; /* calling function */ |
533 | i = ci_func(ci)->l.p->code[currentpc(L, ci)]; | 533 | i = ci_func(ci)->l.p->code[currentpc(L, ci)]; |