gcc/libgfortran/intrinsics
Janne Blomqvist 0e99e09339 PR fortran/91414: Improved PRNG
Update the PRNG from xorshift1024* to xoshiro256** by the same
author. For details see

http://prng.di.unimi.it/

and the paper at

https://arxiv.org/abs/1805.01407

Also the seeding is slightly improved, by reading only 8 bytes from
the operating system and using the simple splitmix64 PRNG to fill in
the rest of the PRNG state (as recommended by the xoshiro author),
instead of reading the entire state from the OS.

Regtested on x86_64-pc-linux-gnu, Ok for trunk?

gcc/fortran/ChangeLog:

2019-08-13  Janne Blomqvist  <jb@gcc.gnu.org>

	PR fortran/91414
	* check.c (gfc_check_random_seed): Reduce seed_size.
	* intrinsic.texi (RANDOM_NUMBER): Update to match new PRNG.

gcc/testsuite/ChangeLog:

2019-08-13  Janne Blomqvist  <jb@gcc.gnu.org>

	PR fortran/91414
	* gfortran.dg/random_seed_1.f90: Update to match new seed size.

libgfortran/ChangeLog:

2019-08-13  Janne Blomqvist  <jb@gcc.gnu.org>

	PR fortran/91414
	* intrinsics/random.c (prng_state): Update state struct.
	(master_state): Update to match new size.
	(get_rand_state): Update to match new PRNG.
	(rotl): New function.
	(xorshift1024star): Replace with prng_next.
	(prng_next): New function.
	(jump): Update for new PRNG.
	(lcg_parkmiller): Replace with splitmix64.
	(splitmix64): New function.
	(getosrandom): Fix return value, simplify.
	(init_rand_state): Use getosrandom only to get 8 bytes, splitmix64
	to fill rest of state.
	(random_r4): Update to new function and struct names.
	(random_r8): Likewise.
	(random_r10): Likewise.
	(random_r16): Likewise.
	(arandom_r4): Liekwise.
	(arandom_r8): Likewise.
	(arandom_r10): Likwewise.
	(arandom_r16): Likewise.
	(xor_keys): Reduce size to match new PRNG.
	(random_seed_i4): Update to new function and struct names, remove
	special handling of variable p used in previous PRNG.
	(random_seed_i8): Likewise.

From-SVN: r274361
2019-08-13 11:24:43 +03:00
..
abort.c
access.c
args.c
associated.c
c99_functions.c
chdir.c
chmod.c
clock.c
cpu_time.c
cshift0.c
ctime.c
date_and_time.c
dprod_r8.f90
dtime.c
env.c
eoshift0.c
eoshift2.c
erfc_scaled_inc.c
erfc_scaled.c
etime.c
execute_command_line.c
exit.c
extends_type_of.c
f2c_specifics.F90
fnum.c
gerror.c
getcwd.c
getlog.c
getXid.c
hostnm.c
ierrno.c
is_contiguous.c
ishftc.c
kill.c
link.c
move_alloc.c
mvbits.c
pack_generic.c
perror.c
rand.c
random_init.f90
random.c PR fortran/91414: Improved PRNG 2019-08-13 11:24:43 +03:00
rename.c
reshape_generic.c
reshape_packed.c
selected_char_kind.c
selected_int_kind.f90
selected_real_kind.f90
signal.c
size.c
sleep.c
spread_generic.c
stat.c
string_intrinsics_inc.c
string_intrinsics.c
symlnk.c
system_clock.c
system.c
time_1.h
time.c
umask.c
unlink.c
unpack_generic.c