diff options
| author | Björn Gustavsson <[email protected]> | 2015-12-14 15:44:55 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2015-12-14 15:44:55 +0100 |
| commit | b68383dd9cc7515ec0d37b370a2fc8db7f119211 (patch) | |
| tree | 475345061572f9c4e73218f2d7f5f80259cbee3b /lib/compiler/src/rec_env.erl | |
| parent | e45ed5449659ac615fcf3c8234a57cf8a10fdc42 (diff) | |
| parent | 61fd09aaef2474cd74ddbc465e9d1dfd879a4ab5 (diff) | |
| download | otp-b68383dd9cc7515ec0d37b370a2fc8db7f119211.tar.gz otp-b68383dd9cc7515ec0d37b370a2fc8db7f119211.tar.bz2 otp-b68383dd9cc7515ec0d37b370a2fc8db7f119211.zip | |
Merge branch 'bjorn/deprecate-random/OTP-12502'
* bjorn/deprecate-random/OTP-12502:
Deprecate the 'random' module
Eliminate mentions of 'random' in documentation
mnesia tests: Replace 'random' with 'rand'
percept tests: Replace 'random' with 'rand'
system tests: Replace 'random' with 'rand'
common_test tests: Replace 'random' with 'rand'
gs: Remove the contribs directory
wx: Replace 'random' with 'rand'
stdlib tests: Replace 'random' with 'rand'
kernel test: Replace 'random' with 'rand'
debugger tests: Replace 'random' with 'rand'
compiler tests: Replace 'random' with 'rand'
Emulator test suite: Replace use of 'random' with 'rand'
Use 'rand' instead of the obsolete 'random' module
compile: Eliminate use of the obsolete 'random' module
Diffstat (limited to 'lib/compiler/src/rec_env.erl')
| -rw-r--r-- | lib/compiler/src/rec_env.erl | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/lib/compiler/src/rec_env.erl b/lib/compiler/src/rec_env.erl index 0e9e12d1ad..5a4a870769 100644 --- a/lib/compiler/src/rec_env.erl +++ b/lib/compiler/src/rec_env.erl @@ -598,7 +598,16 @@ start_range(Env) -> %% (pseudo-)randomly distributed over the range. generate(_N, Range) -> - random:uniform(Range). % works well + %% We must use the same sequence of random variables to ensure + %% that two compilations of the same source code generates the + %% same BEAM code. + case rand:export_seed() of + undefined -> + rand:seed(exsplus, {1,42,2053}); + _ -> + ok + end, + rand:uniform(Range). % works well %% ===================================================================== |