OSDN Git Service

PR fortran/33077
authorfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 15 Aug 2007 12:35:57 +0000 (12:35 +0000)
committerfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 15 Aug 2007 12:35:57 +0000 (12:35 +0000)
commitc02ce61cf7848d32600ed1bc1c2c6eb24fb3bf11
tree329a6ad9ddc89df708274b59d457f1bd0a0e9cb7
parent65addc84eaba8fae3218b8745fe60f594e6ddb79
PR fortran/33077
* intrinsics/random.c (random_seed_i8): Fix code logic.
* gfortran.dg/random_7.f90: Initialize variable.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@127512 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/random_7.f90
libgfortran/ChangeLog
libgfortran/intrinsics/random.c