[Bug fortran/37472] New: bad output on default-format write of double in common block with -m64 flag i

[sdirkse at gams dot com]

If I do write (6,*) 'x=', x   for a double, I get lots of stars for doubles in
a common block when I do a 64-bit compile.  The output is OK for 32-bit or for
doubles not in common.  Here's some output, I'll try attaching the test case
too.

sigvm:/export/home/distrib/lang/f90$make && ./bug 
gfortran -c -m64 bug.f
gfortran -o bug -m64 ./bug.o -ldl
 x =    1001.0000000000000     
 r =  ********************     
sigvm:/export/home/distrib/lang/f90$gfortran -c -m32 bug.f
sigvm:/export/home/distrib/lang/f90$gfortran  -o bug32 -m32 bug.o -ldl
sigvm:/export/home/distrib/lang/f90$./bug32
 x =    1001.0000000000000     
 r =   1000.00000000000000


-- 
           Summary: bad output on default-format write of double in common
                    block with -m64 flag i
           Product: gcc
           Version: 4.3.2
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: sdirkse at gams dot com
  GCC host triplet: i386-pc-solaris2.10


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