diff options
author | John Högberg <[email protected]> | 2019-05-28 17:15:45 +0200 |
---|---|---|
committer | GitHub <[email protected]> | 2019-05-28 17:15:45 +0200 |
commit | 1c05d8815b5aa74c194236249ca3b7f008cf9cc4 (patch) | |
tree | 44aa4c2e36953a6d7a9bcc196be9648acd940645 /lib/observer | |
parent | f98142d32428d30cf4c4d30773568c54c72343e1 (diff) | |
parent | 3caa7894a0271a656b752c878e82519bf9bd03b8 (diff) | |
download | otp-1c05d8815b5aa74c194236249ca3b7f008cf9cc4.tar.gz otp-1c05d8815b5aa74c194236249ca3b7f008cf9cc4.tar.bz2 otp-1c05d8815b5aa74c194236249ca3b7f008cf9cc4.zip |
Merge pull request #2189 from jhogberg/john/erts/seq-trace-on-spawn/OTP-15232/ERL-700
Propagate seq_trace tokens to spawned processes
Diffstat (limited to 'lib/observer')
-rw-r--r-- | lib/observer/test/ttb_SUITE.erl | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lib/observer/test/ttb_SUITE.erl b/lib/observer/test/ttb_SUITE.erl index 33133dd78d..f8bb2e5eb0 100644 --- a/lib/observer/test/ttb_SUITE.erl +++ b/lib/observer/test/ttb_SUITE.erl @@ -658,11 +658,13 @@ seq_trace(Config) when is_list(Config) -> ?line ok = ttb:format( [filename:join(Privdir,atom_to_list(Node)++"-seq_trace")]), ?line [{trace_ts,StartProc,call,{?MODULE,seq,[]},{_,_,_}}, - {seq_trace,0,{send,{0,1},StartProc,P1Proc,{Start,P2}}}, - {seq_trace,0,{send,{1,2},P1Proc,P2Proc,{P1,Start}}}, - {seq_trace,0,{send,{2,3},P2Proc,StartProc,{P2,P1}}}, + {seq_trace,0,{send,{First, Seq0},StartProc,P1Proc,{Start,P2}}}, + {seq_trace,0,{send,{Seq0, Seq1},P1Proc,P2Proc,{P1,Start}}}, + {seq_trace,0,{send,{Seq1, Last},P2Proc,StartProc,{P2,P1}}}, end_of_trace] = flush(), - + true = First < Seq0, + true = Seq0 < Seq1, + true = Seq1 < Last, %% Additional test for metatrace case StartProc of {Start,_,_} -> ok; |