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) ->