diff options
author | Mike Pall <mike> | 2010-02-15 22:26:33 +0100 |
---|---|---|
committer | Mike Pall <mike> | 2010-02-15 22:26:33 +0100 |
commit | e664945e0bc26b5c6c3860a1d63913d56833c173 (patch) | |
tree | 85836e40622f8ca4ced9b6e948c0d7438f85c84c /src | |
parent | e1905f498a8436434b0c1fba2f68d34376be4cbd (diff) | |
download | luajit-e664945e0bc26b5c6c3860a1d63913d56833c173.tar.gz luajit-e664945e0bc26b5c6c3860a1d63913d56833c173.tar.bz2 luajit-e664945e0bc26b5c6c3860a1d63913d56833c173.zip |
Change record vmevent parameters. Dump function id on FUNC*.
Diffstat (limited to 'src')
-rw-r--r-- | src/lj_trace.c | 18 |
1 files changed, 6 insertions, 12 deletions
diff --git a/src/lj_trace.c b/src/lj_trace.c index 7b366d54..8cbbf0f3 100644 --- a/src/lj_trace.c +++ b/src/lj_trace.c | |||
@@ -475,18 +475,12 @@ static TValue *trace_state(lua_State *L, lua_CFunction dummy, void *ud) | |||
475 | 475 | ||
476 | case LJ_TRACE_RECORD: | 476 | case LJ_TRACE_RECORD: |
477 | setvmstate(J2G(J), RECORD); | 477 | setvmstate(J2G(J), RECORD); |
478 | if (J->pt) | 478 | lj_vmevent_send(L, RECORD, |
479 | lj_vmevent_send(L, RECORD, | 479 | setintV(L->top++, J->curtrace); |
480 | setintV(L->top++, J->curtrace); | 480 | setfuncV(L, L->top++, J->fn); |
481 | setfuncV(L, L->top++, J->fn); | 481 | setintV(L->top++, J->pt ? (int32_t)proto_bcpos(J->pt, J->pc) : -1); |
482 | setintV(L->top++, proto_bcpos(J->pt, J->pc)); | 482 | setintV(L->top++, J->framedepth); |
483 | setintV(L->top++, J->framedepth); | 483 | ); |
484 | if (bcmode_mm(bc_op(*J->pc)) == MM_call) { | ||
485 | cTValue *o = &L->base[bc_a(*J->pc)]; | ||
486 | if (bc_op(*J->pc) == BC_ITERC) o -= 3; | ||
487 | copyTV(L, L->top++, o); | ||
488 | } | ||
489 | ); | ||
490 | lj_record_ins(J); | 484 | lj_record_ins(J); |
491 | break; | 485 | break; |
492 | 486 | ||