diff options
| author | Janne Blomqvist <jb@gcc.gnu.org> | 2016-08-11 11:58:55 +0300 |
|---|---|---|
| committer | Janne Blomqvist <jb@gcc.gnu.org> | 2016-08-11 11:58:55 +0300 |
| commit | b152f5a2b33b251ab1874a43d97ce73d11eec0a4 (patch) | |
| tree | 60f87a35243956cff30462d3be48f97f4ba10d65 /libgfortran/runtime/main.c | |
| parent | bb7ebad1c0f641753ffb60a22d2f3c546c406e1b (diff) | |
| download | gcc-b152f5a2b33b251ab1874a43d97ce73d11eec0a4.zip gcc-b152f5a2b33b251ab1874a43d97ce73d11eec0a4.tar.gz gcc-b152f5a2b33b251ab1874a43d97ce73d11eec0a4.tar.bz2 | |
Replace KISS PRNG with xorshift1024* using per-thread state.
frontend:
2016-08-11 Janne Blomqvist <jb@gcc.gnu.org>
* check.c (gfc_check_random_seed): Use new seed size in check.
* intrinsic.texi (RANDOM_NUMBER): Updated documentation.
(RANDOM_SEED): Likewise.
testsuite:
2016-08-11 Janne Blomqvist <jb@gcc.gnu.org>
* gfortran.dg/random_7.f90: Take into account that the last seed
value is the special p value.
* gfortran.dg/random_seed_1.f90: Seed size is now constant.
libgfortran:
2016-08-11 Janne Blomqvist <jb@gcc.gnu.org>
* intrinsics/random.c: Replace KISS with xorshift1024* using
per-thread state.
* runtime/main.c (init): Don't call random_seed_i4.
From-SVN: r239356
Diffstat (limited to 'libgfortran/runtime/main.c')
| -rw-r--r-- | libgfortran/runtime/main.c | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/libgfortran/runtime/main.c b/libgfortran/runtime/main.c index 5065d9c..09b89bc 100644 --- a/libgfortran/runtime/main.c +++ b/libgfortran/runtime/main.c @@ -119,8 +119,6 @@ init (void) set_fpu (); init_compile_options (); - - random_seed_i4 (NULL, NULL, NULL); } |