File 2132-Measure-measure-overhead.patch of Package erlang
From 055239bf3cd7f95d6c6bdb1be2b90e0c6b8987fa Mon Sep 17 00:00:00 2001
From: Raimo Niskanen <raimo@erlang.org>
Date: Mon, 14 Mar 2022 10:54:48 +0100
Subject: [PATCH 2/4] Measure measure() overhead
---
lib/stdlib/test/rand_SUITE.erl | 13 ++++++++++++-
1 file changed, 12 insertions(+), 1 deletion(-)
diff --git a/lib/stdlib/test/rand_SUITE.erl b/lib/stdlib/test/rand_SUITE.erl
index a6b7edce12..09e1815962 100644
--- a/lib/stdlib/test/rand_SUITE.erl
+++ b/lib/stdlib/test/rand_SUITE.erl
@@ -1078,7 +1078,7 @@ do_measure(_Config) ->
Algs),
%%
ct:pal("~nRNG uniform integer full range performance~n",[]),
- _ =
+ [TMarkUniformFullRange|_] =
measure_1(
fun (State) -> half_range(State) bsl 1 end,
fun (State, Range, Mod) ->
@@ -1091,6 +1091,15 @@ do_measure(_Config) ->
State)
end,
Algs),
+ _ =
+ measure_1(
+ fun (_) -> 0 end,
+ fun (State, _, _) ->
+ measure_loop(
+ fun (State0) -> State0 end,
+ State)
+ end,
+ benchmark_dummy, TMarkUniformFullRange),
%%
ct:pal("~nRNG uniform integer full range + 1 performance~n",[]),
_ =
@@ -1276,6 +1285,8 @@ measure_1(RangeFun, Fun, Alg, TMark) ->
{?MODULE, ignored_state};
crypto_bytes_cached ->
{?MODULE, <<>>};
+ benchmark_dummy ->
+ {?MODULE, ignored_state};
_ ->
{rand, rand:seed_s(Alg)}
end,
--
2.34.1