root
/
rabbitmq-server
mirror of https://github.com/rabbitmq/rabbitmq-server.git
1
0
Fork 0
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Merge branch 'binarin-rabbitmq-common-uniform-not-so-uniform' into stable

This commit is contained in:
Michael Klishin 2016-08-04 06:30:24 -07:00
parent 6a9be02ed6 3e1baa1fec
commit b83c426956
1 changed files with 17 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
deps/rabbit_common/src/rand_compat.erl vendored
View File

@ -78,7 +78,19 @@ uniform() ->
code_version:update(?MODULE),
?MODULE:uniform().
uniform_pre_18() -> random:uniform().
ensure_random_seed() ->
case get(random_seed) of
undefined ->
random:seed(erlang:phash2([node()]),
time_compat:monotonic_time(),
time_compat:unique_integer());
_ -> ok
end.
uniform_pre_18() ->
ensure_random_seed(),
random:uniform().
uniform_post_18() -> rand:uniform().
%% uniform/1.
@ -87,7 +99,10 @@ uniform(N) ->
code_version:update(?MODULE),
?MODULE:uniform(N).
uniform_pre_18(N) -> random:uniform(N).
uniform_pre_18(N) ->
ensure_random_seed(),
random:uniform(N).
uniform_post_18(N) -> rand:uniform(N).
%% uniform_s/1.