If I run
gfortran -g gfortran.dg/random_7.f90
valgrind a.out
==27210== Conditional jump or move depends on uninitialised value(s)
==27210== at 0x400A35: MAIN__ (random_7.f90:12)
==27210== by 0x400D0B: main (fmain.c:22)
Using gfortran -g -fdefault-integer-8, ./a.out aborts and valgrind shows:
==27279== Invalid read of size 8
==27279== at 0x4EC9807: _gfortran_random_seed_i8 (random.c:735)
==27279== by 0x400CE3: test_random_seed.1377 (random_7.f90:18)
==27279== by 0x400965: MAIN__ (random_7.f90:10)
==27279== by 0x400D1B: main (fmain.c:22)
==27279== Address 0x4050708 is 0 bytes after a block of size 32 alloc'd
==27279== at 0x4C21D06: malloc (in
/usr/lib64/valgrind/amd64-linux/vgpreload_memcheck.so)
==27279== by 0x4E3E64A: _gfortran_allocate (memory.c:133)
==27279== by 0x4008C9: MAIN__ (random_7.f90:9)
==27279== by 0x400D1B: main (fmain.c:22)
--
Summary: gfortran.dg/random_7.f90: a.out uses uninitialized
memory/test failure
Product: gcc
Version: 4.3.0
Status: UNCONFIRMED
Keywords: wrong-code
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: burnus at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33077
