diff options
author | Sverker Eriksson <[email protected]> | 2018-08-31 18:00:18 +0200 |
---|---|---|
committer | Kjell Winblad <[email protected]> | 2018-09-05 21:47:08 +0200 |
commit | fa28bfbea317d741f76bd38daaccc6b4b7300b1e (patch) | |
tree | 0a30156af3ca569236542a80cbc2f11f620f4c1d /lib/stdlib/test | |
parent | 2a8e00ad72f5a0a9c73d558f247c23d27d6ffd5b (diff) | |
download | otp-fa28bfbea317d741f76bd38daaccc6b4b7300b1e.tar.gz otp-fa28bfbea317d741f76bd38daaccc6b4b7300b1e.tar.bz2 otp-fa28bfbea317d741f76bd38daaccc6b4b7300b1e.zip |
stdlib: Suppress test log spam in ets_SUITE
of repeated table opts
and waiting for workers
Diffstat (limited to 'lib/stdlib/test')
-rw-r--r-- | lib/stdlib/test/ets_SUITE.erl | 17 |
1 files changed, 13 insertions, 4 deletions
diff --git a/lib/stdlib/test/ets_SUITE.erl b/lib/stdlib/test/ets_SUITE.erl index a33bb5ce93..8940f0b58c 100644 --- a/lib/stdlib/test/ets_SUITE.erl +++ b/lib/stdlib/test/ets_SUITE.erl @@ -6649,8 +6649,11 @@ wait_pids(Pids, Acc) -> {Pid,Result} -> true = lists:member(Pid,Pids), Others = lists:delete(Pid,Pids), - io:format("wait_pid got ~p from ~p, still waiting for ~p\n",[Result,Pid,Others]), + %%io:format("wait_pid got ~p from ~p\n",[Result,Pid]), wait_pids(Others,[Result | Acc]) + after 60*1000 -> + io:format("Still waiting for workers ~p\n",[Pids]), + wait_pids(Pids, Acc) end. @@ -7262,9 +7265,15 @@ ets_new(Name, Opts) -> end, EtsNewHelper = fun (MOpts) -> - %%ets:new(Name, [compressed | MOpts]) - io:format("OTPS ~p ~n", [ReplaceStimOrdSetHelper(MOpts)]), - ets:new(Name, ReplaceStimOrdSetHelper(MOpts)) + UseOpts = ReplaceStimOrdSetHelper(MOpts), + case get(ets_new_opts) of + UseOpts -> + silence; %% suppress identical table opts spam + _ -> + put(ets_new_opts, UseOpts), + io:format("ets:new(~p, ~p)~n", [Name, UseOpts]) + end, + ets:new(Name, UseOpts) end, case (lists:member(stim_cat_ord_set, Opts) or lists:member(cat_ord_set, Opts)) andalso |