aboutsummaryrefslogtreecommitdiffstats
path: root/lib/observer/src
diff options
context:
space:
mode:
authorSiri Hansen <[email protected]>2016-04-20 11:43:08 +0200
committerSiri Hansen <[email protected]>2016-05-19 15:21:51 +0200
commit96175f1ebfd109f1268898d68a735ec5a16e9933 (patch)
tree10e9556b2b94525371f266b8353258a3c64704a3 /lib/observer/src
parent37b60d5b365e814c83974cdac0f1eed04dab0ad3 (diff)
downloadotp-96175f1ebfd109f1268898d68a735ec5a16e9933.tar.gz
otp-96175f1ebfd109f1268898d68a735ec5a16e9933.tar.bz2
otp-96175f1ebfd109f1268898d68a735ec5a16e9933.zip
[ttb] Set trace patterns on messages
Functions ttb:tpe/2 and ttb:ctpe/1 are added.
Diffstat (limited to 'lib/observer/src')
-rw-r--r--lib/observer/src/ttb.erl12
1 files changed, 11 insertions, 1 deletions
diff --git a/lib/observer/src/ttb.erl b/lib/observer/src/ttb.erl
index 4d6eb3ba8d..32c2fad775 100644
--- a/lib/observer/src/ttb.erl
+++ b/lib/observer/src/ttb.erl
@@ -25,7 +25,8 @@
-export([tracer/0,tracer/1,tracer/2,p/2,stop/0,stop/1,start_trace/4]).
-export([get_et_handler/0]).
-export([tp/2, tp/3, tp/4, ctp/0, ctp/1, ctp/2, ctp/3, tpl/2, tpl/3, tpl/4,
- ctpl/0, ctpl/1, ctpl/2, ctpl/3, ctpg/0, ctpg/1, ctpg/2, ctpg/3]).
+ ctpl/0, ctpl/1, ctpl/2, ctpl/3, ctpg/0, ctpg/1, ctpg/2, ctpg/3,
+ tpe/2, ctpe/1]).
-export([seq_trigger_ms/0,seq_trigger_ms/1]).
-export([write_trace_info/2]).
-export([write_config/2,write_config/3,run_config/1,run_config/2,list_config/1]).
@@ -479,6 +480,11 @@ tpl(A,B,C,D) ->
store(tpl,[A,B,C,ms(D)]),
dbg:tpl(A,B,C,ms(D)).
+tpe(A,B) ->
+ ensure_no_overloaded_nodes(),
+ store(tpe,[A,ms(B)]),
+ dbg:tpe(A,ms(B)).
+
ctp() ->
store(ctp,[]),
dbg:ctp().
@@ -518,6 +524,10 @@ ctpg(A,B,C) ->
store(ctpg,[A,B,C]),
dbg:ctpg(A,B,C).
+ctpe(A) ->
+ store(ctpe,[A]),
+ dbg:ctpe(A).
+
ms(return) ->
[{'_',[],[{return_trace}]}];
ms(caller) ->