diff options
| author | Sverker Eriksson <[email protected]> | 2018-05-21 15:24:53 +0200 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2018-06-04 16:28:48 +0200 |
| commit | 6dfe9675e59af81d9d0b11f6ef36777fc1e70d51 (patch) | |
| tree | ad14e01db96eba0a6465ac77b5cb4060adba37f9 /lib/stdlib/test/ets_SUITE.erl | |
| parent | 29946f8628df35f000e37e5db8782decfa44876b (diff) | |
| download | otp-6dfe9675e59af81d9d0b11f6ef36777fc1e70d51.tar.gz otp-6dfe9675e59af81d9d0b11f6ef36777fc1e70d51.tar.bz2 otp-6dfe9675e59af81d9d0b11f6ef36777fc1e70d51.zip | |
erts: Reduce test log noise from ets_SUITE
Diffstat (limited to 'lib/stdlib/test/ets_SUITE.erl')
| -rw-r--r-- | lib/stdlib/test/ets_SUITE.erl | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/lib/stdlib/test/ets_SUITE.erl b/lib/stdlib/test/ets_SUITE.erl index 574aac96c8..a97fe4a5d9 100644 --- a/lib/stdlib/test/ets_SUITE.erl +++ b/lib/stdlib/test/ets_SUITE.erl @@ -6209,20 +6209,23 @@ spawn_logger(Procs) -> ok; (Proc) -> Mon = erlang:monitor(process, Proc), - receive + ok = receive {'DOWN', Mon, _, _, _} -> ok after 0 -> case Kill of true -> exit(Proc, kill); - _ -> - erlang:display({"Waiting for 'DOWN' from", Proc, - process_info(Proc), - pid_status(Proc)}) + _ -> ok end, receive {'DOWN', Mon, _, _, _} -> ok + after 5000 -> + io:format("Waiting for 'DOWN' from ~w, status=~w\n" + "info = ~p\n", [Proc, + pid_status(Proc), + process_info(Proc)]), + timeout end end end, Procs), |