File 4143-Improve-test-case-diagnostics.patch of Package erlang

From 3ff1e69a3c5340656f1dce8cae74dcc02bb4e9ee Mon Sep 17 00:00:00 2001
From: Raimo Niskanen <raimo@erlang.org>
Date: Thu, 20 Oct 2022 16:00:34 +0200
Subject: [PATCH 23/27] Improve test case diagnostics

---
 lib/ssl/test/ssl_dist_bench_SUITE.erl | 23 ++++++++++++++++-------
 1 file changed, 16 insertions(+), 7 deletions(-)

diff --git a/lib/ssl/test/ssl_dist_bench_SUITE.erl b/lib/ssl/test/ssl_dist_bench_SUITE.erl
index 40bdcdf367..d73b5bc3dd 100644
--- a/lib/ssl/test/ssl_dist_bench_SUITE.erl
+++ b/lib/ssl/test/ssl_dist_bench_SUITE.erl
@@ -490,15 +490,24 @@ sched_util_runner(A, B, Effort, Senders, Config) ->
           fun() ->
                   receive
                       {start,Tag,Pid} ->
+                          fs_log(
+                            Config,
+                            "sched_util_runner.Server.msacc.self",
+                            self()),
                           msacc:start(Time),
+                          fs_log(
+                            Config,
+                            "sched_util_runner.Server.msacc:start",
+                            ok),
                           receive
                               {done,Tag,Pid} ->
-                                  fs_log(Config,
-                                         "sched_util_runner.msacc:stats",
-                                         ok),
+                                  fs_log(
+                                    Config,
+                                    "sched_util_runner.Server.msacc:stats",
+                                    ok),
                                   ServerStats = msacc:stats(),
                                   fs_log(Config,
-                                         "sched_util_runner.msacc:ServerStats",
+                                         "sched_util_runner.Server.msacc:stats",
                                          ServerStats),
                                   exit({result,Tag,ServerStats})
                           end
@@ -515,11 +524,11 @@ sched_util_runner(A, B, Effort, Senders, Config) ->
     %%
     receive after 1000 -> ok end,
     ServerMsacc ! {start,Tag,self()},
-    fs_log(Config, "sched_util_runner.self", self()),
+    fs_log(Config, "sched_util_runner.Client.self", self()),
     msacc:start(Time),
-    fs_log(Config, "sched_util_runner.msacc:start.done", ok),
+    fs_log(Config, "sched_util_runner.Client.msacc:start", ok),
     ClientMsaccStats = msacc:stats(),
-    fs_log(Config, "sched_util_runner.ClientMsaccStats", ClientMsaccStats),
+    fs_log(Config, "sched_util_runner.Client.msacc.stats", ClientMsaccStats),
     receive after 1000 -> ok end,
     ServerMsacc ! {done,Tag,self()},
     ServerMsaccStats =
-- 
2.35.3