diff options
author | Björn-Egil Dahlberg <[email protected]> | 2010-05-25 14:17:07 +0200 |
---|---|---|
committer | Raimo Niskanen <[email protected]> | 2010-06-03 14:54:21 +0200 |
commit | b2369c68b33344eb44544c0892cffb8acc658ffa (patch) | |
tree | 8f132d4c0c675b33afe00cc74820640abd169e68 /erts/emulator/beam/beam_emu.c | |
parent | c523cc520d7de33e97be6da77acdd35033efdc41 (diff) | |
download | otp-b2369c68b33344eb44544c0892cffb8acc658ffa.tar.gz otp-b2369c68b33344eb44544c0892cffb8acc658ffa.tar.bz2 otp-b2369c68b33344eb44544c0892cffb8acc658ffa.zip |
Teach call time trace patterns to include bifs
Diffstat (limited to 'erts/emulator/beam/beam_emu.c')
-rw-r--r-- | erts/emulator/beam/beam_emu.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/erts/emulator/beam/beam_emu.c b/erts/emulator/beam/beam_emu.c index d543006b62..c0680086aa 100644 --- a/erts/emulator/beam/beam_emu.c +++ b/erts/emulator/beam/beam_emu.c @@ -231,7 +231,7 @@ BeamInstr* em_call_traced_function; BeamInstr beam_return_to_trace[1]; /* OpCode(i_return_to_trace) */ BeamInstr beam_return_trace[1]; /* OpCode(i_return_trace) */ BeamInstr beam_exception_trace[1]; /* UGLY also OpCode(i_return_trace) */ -BeamInstr beam_return_time_trace[1]; /* OpCode(i_time_return_trace) */ +BeamInstr beam_return_time_trace[1]; /* OpCode(i_return_time_trace) */ /* * All Beam instructions in numerical order. @@ -5054,6 +5054,8 @@ apply_bif_or_nif_epilogue: bif_export[i] = ep; ep->code[3] = (BeamInstr) OpCode(apply_bif); ep->code[4] = (BeamInstr) bif_table[i].f; + /* XXX: set func info for bifs */ + ((BeamInstr*)ep->code + 3)[-5] = (BeamInstr) BeamOp(op_i_func_info_IaaI); } return; |