diff options
| author | Richard Carlsson <[email protected]> | 2012-02-13 10:35:57 +0100 |
|---|---|---|
| committer | Fredrik Gustafsson <[email protected]> | 2012-08-10 10:57:22 +0200 |
| commit | b91207f58f9c52ae09c42947029f28932e5991c5 (patch) | |
| tree | 69fea8f2273434333c6558370f9e05d01fc70752 | |
| parent | fea574bac8464f07a72862e1a4f92e9b62e464e4 (diff) | |
| download | otp-b91207f58f9c52ae09c42947029f28932e5991c5.tar.gz otp-b91207f58f9c52ae09c42947029f28932e5991c5.tar.bz2 otp-b91207f58f9c52ae09c42947029f28932e5991c5.zip | |
make stack trace pruning know about the new format
| -rw-r--r-- | lib/eunit/src/eunit_test.erl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/eunit/src/eunit_test.erl b/lib/eunit/src/eunit_test.erl index bca49ae626..3457b5ee21 100644 --- a/lib/eunit/src/eunit_test.erl +++ b/lib/eunit/src/eunit_test.erl @@ -43,8 +43,12 @@ get_stacktrace(Ts) -> prune_trace([{eunit_data, _, _} | Rest], Tail) -> prune_trace(Rest, Tail); +prune_trace([{eunit_data, _, _, _} | Rest], Tail) -> + prune_trace(Rest, Tail); prune_trace([{?MODULE, _, _} | _Rest], Tail) -> Tail; +prune_trace([{?MODULE, _, _, _} | _Rest], Tail) -> + Tail; prune_trace([T | Ts], Tail) -> [T | prune_trace(Ts, Tail)]; prune_trace([], Tail) -> |