This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

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



------- Comment #1 from fxcoudert at gcc dot gnu dot org  2007-08-15 09:54 -------
(In reply to comment #0)
> ==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)

Humpf, stupid me, the testcase doesn't initialize seed. Adding seed(:) =
huge(seed) gets rid of this one.

> Using gfortran -g -fdefault-integer-8, ./a.out aborts

It doesn't abort for me, but adding the non-zero initialization above makes it
abort. I introduced it, I'll fix it! (not that it's much of a regression,
because RANDOM_SEED never worked for integer(kind=8) before ;-)


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |fxcoudert at gcc dot gnu dot
                   |dot org                     |org
             Status|UNCONFIRMED                 |ASSIGNED
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2007-08-15 09:54:05
               date|                            |
            Summary|gfortran.dg/random_7.f90:   |RANDOM_SEED failure for
                   |a.out uses uninitialized    |integer(kind=8)
                   |memory/test failure         |
   Target Milestone|---                         |4.3.0


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


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]