From 875fd93c65810378dd377604bea67c4c1f933b87 Mon Sep 17 00:00:00 2001 From: Lukas Larsson Date: Wed, 3 Aug 2011 15:40:07 +0200 Subject: Add two additional built-in trace patterns, c and cx c means [{'_',[],[{message,{caller}}]}] cx means [{'_',[],[{exception_trace},{message,{caller}}]}] --- lib/runtime_tools/src/dbg.erl | 13 +++++++++++++ 1 file changed, 13 insertions(+) (limited to 'lib/runtime_tools/src') diff --git a/lib/runtime_tools/src/dbg.erl b/lib/runtime_tools/src/dbg.erl index 56283f4d3d..446de63064 100644 --- a/lib/runtime_tools/src/dbg.erl +++ b/lib/runtime_tools/src/dbg.erl @@ -1449,6 +1449,19 @@ new_pattern_table() -> ets:insert(PT, {exception_trace, term_to_binary(x)}), + ets:insert(PT, + {c, + term_to_binary([{'_',[],[{message,{caller}}]}])}), + ets:insert(PT, + {caller_trace, + term_to_binary(c)}), + ets:insert(PT, + {cx, + term_to_binary([{'_',[],[{exception_trace}, + {message,{caller}}]}])}), + ets:insert(PT, + {caller_exception_trace, + term_to_binary(cx)}), PT. -- cgit v1.2.3