r239611 - in /trunk: gcc/testsuite/ChangeLog gc...

[jb@gcc.gnu.org]

Author: jb
Date: Fri Aug 19 14:12:32 2016
New Revision: 239611

URL: https://gcc.gnu.org/viewcvs?rev=239611&root=gcc&view=rev
Log:
Always initialize PRNG using random data from the OS.

libgfortran:

2016-08-16  Janne Blomqvist  <jb@gcc.gnu.org>

        * intrinsics/random.c (master_init): New variable.
        (init_rand_state): Move below getosrandom (), maybe initialize
        master_state.
        (random_seed_i4): If called with no arguments, set master_init to
        false, and reinitialize. If called with PUT=, set master_init to
        true.
        (random_seed_i8): Likewise.

testsuite:

2016-08-16  Janne Blomqvist  <jb@gcc.gnu.org>

        * gfortran.dg/random_4.f90: Initialize seed before using, handle
        the last special seed value.
        * gfortran.dg/random_7.f90: Use size for last array member instead
        of hardcoded value.

Modified:
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/random_4.f90
    trunk/gcc/testsuite/gfortran.dg/random_7.f90
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/intrinsics/random.c