This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/33077] RANDOM_SEED failure for integer(kind=8)
- From: "fxcoudert at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 15 Aug 2007 12:36:21 -0000
- Subject: [Bug fortran/33077] RANDOM_SEED failure for integer(kind=8)
- References: <bug-33077-13404@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla 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