nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

bug: current line should work for call hook

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2005-06-13 11:15:22 -03:00
parent 746a1d612b
commit 5fa2bec1f0
1 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
lvm.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lvm.c,v 2.45 2005/05/20 15:53:42 roberto Exp roberto $ ** $Id: lvm.c,v 2.46 2005/05/31 14:25:18 roberto Exp roberto $
** Lua virtual machine ** Lua virtual machine
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -364,8 +364,11 @@ StkId luaV_execute (lua_State *L, int nexeccalls) {
TValue *k; TValue *k;
const Instruction *pc; const Instruction *pc;
callentry: /* entry point when calling new functions */ callentry: /* entry point when calling new functions */
if (L->hookmask & LUA_MASKCALL) if (L->hookmask & LUA_MASKCALL) {
L->savedpc++; /* hooks assume 'pc' is already incremented */
luaD_callhook(L, LUA_HOOKCALL, -1); luaD_callhook(L, LUA_HOOKCALL, -1);
L->savedpc--; /* correct 'pc' */
}
retentry: /* entry point when returning to old functions */ retentry: /* entry point when returning to old functions */
pc = L->savedpc; pc = L->savedpc;
cl = &clvalue(L->ci->func)->l; cl = &clvalue(L->ci->func)->l;