File 6031-Fix-ets-benchmark-badarith-bug.patch of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 6031-Fix-ets-benchmark-badarith-bug.patch of Package erlang

From e8dd8c472977571a60a5939ee2e4dbcb87d1dddf Mon Sep 17 00:00:00 2001
From: Sverker Eriksson <sverker@erlang.org>
Date: Wed, 19 Jan 2022 19:10:59 +0100
Subject: [PATCH 1/4] Fix ets benchmark badarith bug

---
 lib/stdlib/test/ets_SUITE.erl | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/lib/stdlib/test/ets_SUITE.erl b/lib/stdlib/test/ets_SUITE.erl
index 25800775b8..fbd7d2fc69 100644
--- a/lib/stdlib/test/ets_SUITE.erl
+++ b/lib/stdlib/test/ets_SUITE.erl
@@ -266,10 +266,15 @@ end_per_group(benchmark, Config) ->
     T = proplists:get_value(ets_benchmark_result_summary_tab, Config),
     EtsProcess = proplists:get_value(ets_benchmark_result_summary_tab_process, Config),
     Report = 
-        fun(NOfBenchmarksCtr, TotThroughoutCtr, Name) ->
+        fun(NOfBenchmarksCtr, TotThroughputCtr, Name) ->
                 Average =
-                    ets:lookup_element(T, TotThroughoutCtr, 2) / 
-                    ets:lookup_element(T, NOfBenchmarksCtr, 2),
+                    case {ets:lookup_element(T, TotThroughputCtr, 2),
+                          ets:lookup_element(T, NOfBenchmarksCtr, 2)} of
+                        {0.0, 0.0} ->
+                            0;
+                        {TotThrp, NBench} ->
+                            TotThrp / NBench
+                    end,
                 io:format("~p ~p~n", [Name, Average]),
                 ct_event:notify(
                   #event{name = benchmark_data, 
-- 
2.34.1

Places

File 6031-Fix-ets-benchmark-badarith-bug.patch of Package erlang

Places