aboutsummaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
authorRaimo Niskanen <[email protected]>2019-03-28 16:02:17 +0100
committerRaimo Niskanen <[email protected]>2019-03-29 11:22:29 +0100
commit9033c741be9c9722c9b5621800d15b33e342e26f (patch)
tree9f7a5320381883f83e128fd04f89b7182b96e3aa /lib
parent7f507b2d6b3ce8acdd34c9c0c1fa1e4b7f0bddb3 (diff)
downloadotp-9033c741be9c9722c9b5621800d15b33e342e26f.tar.gz
otp-9033c741be9c9722c9b5621800d15b33e342e26f.tar.bz2
otp-9033c741be9c9722c9b5621800d15b33e342e26f.zip
Improve printouts
Diffstat (limited to 'lib')
-rw-r--r--lib/ssl/test/ssl_dist_bench_SUITE.erl32
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