File 4497-Fix-ETS-benchmark-so-it-only-run-with-auto... of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 4497-Fix-ETS-benchmark-so-it-only-run-with-auto-when-supp.patch of Package erlang

From dd7df872da75ccc42dda279dc5257e12f10b99fe Mon Sep 17 00:00:00 2001
From: Kjell Winblad <kjellwinblad@gmail.com>
Date: Wed, 27 Oct 2021 15:30:23 +0200
Subject: [PATCH 7/8] Fix ETS benchmark so it only run with auto when supported

---
 lib/stdlib/test/ets_SUITE.erl | 15 +++++++++------
 1 file changed, 9 insertions(+), 6 deletions(-)

diff --git a/lib/stdlib/test/ets_SUITE.erl b/lib/stdlib/test/ets_SUITE.erl
index ee2428ca80..ec67519d80 100644
--- a/lib/stdlib/test/ets_SUITE.erl
+++ b/lib/stdlib/test/ets_SUITE.erl
@@ -8136,12 +8136,15 @@ long_throughput_benchmark(Config) when is_list(Config) ->
               ]
              ],
          table_types =
-             [
-              [ordered_set, public, {write_concurrency, true}, {read_concurrency, true}],
-              [set, public, {write_concurrency, true}, {read_concurrency, true}],
-              [set, public, {write_concurrency, auto}, {read_concurrency, true}],
-              [set, public, {write_concurrency, {debug_hash_fixed_number_of_locks, 16384}}]
-             ],
+             ([
+               [ordered_set, public, {write_concurrency, true}, {read_concurrency, true}],
+               [set, public, {write_concurrency, true}, {read_concurrency, true}]
+              ] ++
+                  case catch list_to_integer(erlang:system_info(otp_release)) of
+                      Recent when is_integer(Recent), Recent >= 25 ->
+                          [[set, public, {write_concurrency, auto}, {read_concurrency, true}]];
+                      _Old -> []
+                  end),
          etsmem_fun = fun etsmem/0,
          verify_etsmem_fun = fun verify_etsmem/1,
          notify_res_fun =
-- 
2.31.1

Places

File 4497-Fix-ETS-benchmark-so-it-only-run-with-auto-when-supp.patch of Package erlang

Places