diff options
| author | Raimo Niskanen <[email protected]> | 2019-03-28 16:02:17 +0100 |
|---|---|---|
| committer | Raimo Niskanen <[email protected]> | 2019-03-29 11:22:29 +0100 |
| commit | 9033c741be9c9722c9b5621800d15b33e342e26f (patch) | |
| tree | 9f7a5320381883f83e128fd04f89b7182b96e3aa | |
| parent | 7f507b2d6b3ce8acdd34c9c0c1fa1e4b7f0bddb3 (diff) | |
| download | otp-9033c741be9c9722c9b5621800d15b33e342e26f.tar.gz otp-9033c741be9c9722c9b5621800d15b33e342e26f.tar.bz2 otp-9033c741be9c9722c9b5621800d15b33e342e26f.zip | |
Improve printouts
| -rw-r--r-- | lib/ssl/test/ssl_dist_bench_SUITE.erl | 32 |
1 files changed, 18 insertions, 14 deletions
diff --git a/lib/ssl/test/ssl_dist_bench_SUITE.erl b/lib/ssl/test/ssl_dist_bench_SUITE.erl index 9cc4d8c67b..b3eec555da 100644 --- a/lib/ssl/test/ssl_dist_bench_SUITE.erl +++ b/lib/ssl/test/ssl_dist_bench_SUITE.erl @@ -395,21 +395,25 @@ sched_utilization(A, B, Prefix, HA, HB, SSL) -> ct:log("Stats of A from B: ~p", [ssl_apply(HB, net_kernel, node_info, [A])]), SchedUtilClient = - 10000 * msacc:stats(system_runtime,ClientMsacc) / - msacc:stats(system_realtime,ClientMsacc), + round(10000 * msacc:stats(system_runtime,ClientMsacc) / + msacc:stats(system_realtime,ClientMsacc)), SchedUtilServer = - 10000 * msacc:stats(system_runtime,ServerMsacc) / - msacc:stats(system_realtime,ServerMsacc), - report(Prefix++" Sched Utilization Client", - SchedUtilClient, "util 0.01 %"), - report(Prefix++" Sched Utilization Server", - SchedUtilServer, "util 0.01 %"), - {comment, - "Client " ++ - lists:flatten(io_lib:format("~.3g", [SchedUtilClient / 100])) ++ - "%, Server " ++ - lists:flatten(io_lib:format("~.3g", [SchedUtilServer / 100])) ++ - "%"}. + round(10000 * msacc:stats(system_runtime,ServerMsacc) / + msacc:stats(system_realtime,ServerMsacc)), + Verdict = + case Msgs of + [] -> + ""; + _ -> + " ???" + end, + {comment, ClientComment} = + report(Prefix ++ " Sched Utilization Client" ++ Verdict, + SchedUtilClient, "/100 %" ++ Verdict), + {comment, ServerComment} = + report(Prefix++" Sched Utilization Server" ++ Verdict, + SchedUtilServer, "/100 %" ++ Verdict), + {comment, "Client " ++ ClientComment ++ ", Server " ++ ServerComment}. %% Runs on node A and spawns a server on node B %% We want to avoid getting busy_dist_port as it hides the true SU usage |