[Bug fortran/33077] RANDOM_SEED failure for integer(kind=8)

[fxcoudert at gcc dot gnu dot org]

------- Comment #2 from fxcoudert at gcc dot gnu dot org  2007-08-15 12:36 
-------
Subject: Bug 33077

Author: fxcoudert
Date: Wed Aug 15 12:35:57 2007
New Revision: 127512

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=127512
Log:
        PR fortran/33077
        * intrinsics/random.c (random_seed_i8): Fix code logic.
        * gfortran.dg/random_7.f90: Initialize variable.

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


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33077