diff options
| author | Björn Gustavsson <[email protected]> | 2015-12-09 15:04:28 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2015-12-11 14:37:46 +0100 |
| commit | 71ddd8c1aba0478fe5aa07bdc8f9e6a86515bb11 (patch) | |
| tree | 83a6fbd1c8bb8c06c03c8a1a4bb8ab1adb770ea0 /erts/emulator/test/driver_SUITE.erl | |
| parent | 80757f9491c72ee262a5910e0b3b02e95b1e5f2a (diff) | |
| download | otp-71ddd8c1aba0478fe5aa07bdc8f9e6a86515bb11.tar.gz otp-71ddd8c1aba0478fe5aa07bdc8f9e6a86515bb11.tar.bz2 otp-71ddd8c1aba0478fe5aa07bdc8f9e6a86515bb11.zip | |
Emulator test suite: Replace use of 'random' with 'rand'
Diffstat (limited to 'erts/emulator/test/driver_SUITE.erl')
| -rw-r--r-- | erts/emulator/test/driver_SUITE.erl | 15 |
1 files changed, 4 insertions, 11 deletions
diff --git a/erts/emulator/test/driver_SUITE.erl b/erts/emulator/test/driver_SUITE.erl index b72d6cbe52..4fd7b36e6a 100644 --- a/erts/emulator/test/driver_SUITE.erl +++ b/erts/emulator/test/driver_SUITE.erl @@ -224,7 +224,7 @@ outputv_errors_1(Term) -> port_close(Port). build_iolist(N, Base) when N < 16 -> - case random:uniform(3) of + case rand:uniform(3) of 1 -> <<Bin:N/binary,_/binary>> = Base, Bin; @@ -232,7 +232,7 @@ build_iolist(N, Base) when N < 16 -> lists:seq(1, N) end; build_iolist(N, Base) when N =< byte_size(Base) -> - case random:uniform(3) of + case rand:uniform(3) of 1 -> <<Bin:N/binary,_/binary>> = Base, Bin; @@ -250,7 +250,7 @@ build_iolist(N, Base) when N =< byte_size(Base) -> end end; build_iolist(N0, Base) -> - Small = random:uniform(15), + Small = rand:uniform(15), Seq = lists:seq(1, Small), N = N0 - Small, case N rem 2 of @@ -2502,14 +2502,7 @@ random_char() -> uniform(256) - 1. uniform(N) -> - case get(random_seed) of - undefined -> - {X, Y, Z} = time(), - random:seed(X, Y, Z); - _ -> - ok - end, - random:uniform(N). + rand:uniform(N). erl_millisecs() -> erl_millisecs(erlang:monotonic_time()). |