From b937b42d2f98c4e0024418dbbd55ff545bcf65d6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn-Egil=20Dahlberg?= <psyeugenic@gmail.com>
Date: Sat, 10 Apr 2010 17:27:24 +0200
Subject: Call time breakpoint tracing framework

Initial commit with a new breakpoint instruction and PSD areas
for temporary time storage during tracing.
---
 erts/emulator/beam/beam_emu.c | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

(limited to 'erts/emulator/beam/beam_emu.c')

diff --git a/erts/emulator/beam/beam_emu.c b/erts/emulator/beam/beam_emu.c
index d42e74ccc9..145ae48590 100644
--- a/erts/emulator/beam/beam_emu.c
+++ b/erts/emulator/beam/beam_emu.c
@@ -4408,6 +4408,22 @@ apply_bif_or_nif_epilogue:
      Goto(real_I);
  }
 
+ OpCase(i_time_breakpoint): {
+     BeamInstr real_I;
+     BpDataTime *bdt = (BpDataTime *) (I)[-4];
+
+     ASSERT((I)[-5] == (Uint) BeamOp(op_i_func_info_IaaI));
+     ASSERT(bdt);
+     bdt = (BpDataTime *) bdt->next;
+     ASSERT(bdt);
+     (I)[-4] = (Uint) bdt;
+     real_I = bdt->orig_instr;
+     erts_do_time_break(c_p, bdt);
+
+     ASSERT(VALID_INSTR(real_I));
+     Goto(real_I);
+ }
+
  OpCase(i_trace_breakpoint):
      if (! IS_TRACED_FL(c_p, F_TRACE_CALLS)) {
 	 BeamInstr real_I;
-- 
cgit v1.2.3