aboutsummaryrefslogtreecommitdiffstats
path: root/erts/emulator/test
diff options
context:
space:
mode:
authorSverker Eriksson <[email protected]>2016-05-04 14:45:05 +0200
committerSverker Eriksson <[email protected]>2016-05-04 19:53:38 +0200
commit54172674e71caf7da7a0b069c9bd92543e4f705d (patch)
tree7897a7dcf376e68ba305b5846201f838fdb89844 /erts/emulator/test
parent6197aa2498bcb35e331c9112a70635f55047bf26 (diff)
downloadotp-54172674e71caf7da7a0b069c9bd92543e4f705d.tar.gz
otp-54172674e71caf7da7a0b069c9bd92543e4f705d.tar.bz2
otp-54172674e71caf7da7a0b069c9bd92543e4f705d.zip
erts: Add send and 'receive' to trace_info/2
to obtain match specs
Diffstat (limited to 'erts/emulator/test')
-rw-r--r--erts/emulator/test/trace_SUITE.erl5
1 files changed, 4 insertions, 1 deletions
diff --git a/erts/emulator/test/trace_SUITE.erl b/erts/emulator/test/trace_SUITE.erl
index 1930332691..3d7cb41fc0 100644
--- a/erts/emulator/test/trace_SUITE.erl
+++ b/erts/emulator/test/trace_SUITE.erl
@@ -495,7 +495,10 @@ send_trace(Config) when is_list(Config) ->
ok.
set_trace_pattern(_, no, _) -> 0;
-set_trace_pattern(MSA, Pat, Flg) -> erlang:trace_pattern(MSA, Pat, Flg).
+set_trace_pattern(MFA, Pat, Flg) ->
+ R = erlang:trace_pattern(MFA, Pat, Flg),
+ {match_spec, Pat} = erlang:trace_info(MFA, match_spec),
+ R.
%% Test trace(Pid, How, [procs]).
procs_trace(Config) when is_list(Config) ->