------- Comment #17 from sdirkse at gams dot com 2008-12-22 20:37 -------
After all the updates committed for this bug, I thought I'd try the latest,
including updating to ggmp-4.2.4 and mpfr-2.3.2. Here's the result for the GCC
4.3.2 release and the latest GCC. Note that the 32-bit stuff hasn't changed
and now I get all-stars output for *both* outputs in 64-bit, not just one of
the outputs.
sigvm:/export/home/distrib/lang/f90$/usr/local2/bin/gfortran -v
Using built-in specs.
Target: i386-pc-solaris2.10
Configured with: ../configure CC=gcc --prefix=/usr/local2
--build=i386-pc-solaris2.10 --with-gnu-as --with-as=/usr/local/bin/as
--without-gnu-ld --with-ld=/usr/ccs/bin/ld --with-gmp=/usr/local
--with-mpfr=/usr/local --enable-languages=c,c++,fortran --enable-shared
Thread model: posix
gcc version 4.3.2 (GCC)
sigvm:/export/home/distrib/lang/f90$cat bug.f
PROGRAM bug
IMPLICIT NONE
DOUBLE PRECISION r
COMMON /gggg91/ r
DOUBLE PRECISION x
x = 1001
write(6,*) 'x = ', x
r = 1000
write(6,*) 'r = ', r
END
sigvm:/export/home/distrib/lang/f90$/usr/local2/bin/gfortran -o bug32 -m32
bug.f
sigvm:/export/home/distrib/lang/f90$/usr/local2/bin/gfortran -o bug64 -m64
bug.f
sigvm:/export/home/distrib/lang/f90$./bug32
x = 1001.0000000000000
r = 1000.00000000000000
sigvm:/export/home/distrib/lang/f90$./bug64
x = 1001.0000000000000
r = ********************
sigvm:/export/home/distrib/lang/f90$/usr/local3/bin/gfortran -v
Using built-in specs.
Target: i386-pc-solaris2.11
Configured with: ../configure CC=gcc --prefix=/usr/local3
--build=i386-pc-solaris2.11 --with-gnu-as --with-as=/usr/local/bin/as
--without-gnu-ld --with-ld=/usr/ccs/bin/ld --with-gmp=/usr/local
--with-mpfr=/usr/local --enable-languages=c,c++,fortran --enable-shared
Thread model: posix
gcc version 4.4.0 20081222 (experimental) (GCC)
sigvm:/export/home/distrib/lang/f90$/usr/local3/bin/gfortran -o bug32 -m32
bug.f
sigvm:/export/home/distrib/lang/f90$/usr/local3/bin/gfortran -o bug64 -m64
bug.f
sigvm:/export/home/distrib/lang/f90$./bug32
x = 1001.0000000000000
r = 1000.00000000000000
sigvm:/export/home/distrib/lang/f90$./bug64
x = ********************
r = ********************
sigvm:/export/home/distrib/lang/f90$
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37472
