From 38e9b0e80a937ab1775cdb3e0214d5c304a023b5 Mon Sep 17 00:00:00 2001 From: "Heinz N. Gies" Date: Mon, 31 Jul 2017 21:15:19 +0200 Subject: [PATCH] Add missing uniform/0 function --- src/leveled_rand.erl | 7 +++++++ test/end_to_end/testutil.erl | 4 ++-- 2 files changed, 9 insertions(+), 2 deletions(-) diff --git a/src/leveled_rand.erl b/src/leveled_rand.erl index b5d199f..6d3c685 100644 --- a/src/leveled_rand.erl +++ b/src/leveled_rand.erl @@ -5,6 +5,7 @@ %% API -export([ + uniform/0, uniform/1, seed/0, rand_bytes/1 @@ -14,6 +15,9 @@ %%% New (r19+) rand style functions %%%=================================================================== -ifndef(old_rand). +uniform() -> + rand:uniform(). + uniform(N) -> rand:uniform(N). @@ -27,6 +31,9 @@ rand_bytes(Size) -> %%%=================================================================== %%% Old (r18) random style functions %%%=================================================================== +uniform() -> + random:uniform(). + uniform(N) -> random:uniform(N). diff --git a/test/end_to_end/testutil.erl b/test/end_to_end/testutil.erl index 04b44e8..ef0318f 100644 --- a/test/end_to_end/testutil.erl +++ b/test/end_to_end/testutil.erl @@ -319,10 +319,10 @@ get_compressiblevalue() -> L). generate_smallobjects(Count, KeyNumber) -> - generate_objects(Count, KeyNumber, [], crypto:rand_bytes(512)). + generate_objects(Count, KeyNumber, [], leveled_rand:rand_bytes(512)). generate_objects(Count, KeyNumber) -> - generate_objects(Count, KeyNumber, [], crypto:rand_bytes(4096)). + generate_objects(Count, KeyNumber, [], leveled_rand:rand_bytes(4096)). generate_objects(Count, KeyNumber, ObjL, Value) ->