This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/37472] bad output on default-format write of double in common block with -m64 flag i
- From: "dominiq at lps dot ens dot fr" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 11 Sep 2008 11:37:38 -0000
- Subject: [Bug fortran/37472] bad output on default-format write of double in common block with -m64 flag i
- References: <bug-37472-14147@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #3 from dominiq at lps dot ens dot fr 2008-09-11 11:37 -------
I cannot reproduce it on ppc/intel Darwin9, however the following code:
PROGRAM bug
IMPLICIT NONE
DOUBLE PRECISION r
COMMON /gggg91/ r
DOUBLE PRECISION x
x = 1000
write(6,*) 'x = ', x
r = 1000
write(6,*) 'r = ', r
x = 1001
write(6,*) 'x = ', x
r = 1001
write(6,*) 'r = ', r
END
gives
x = 1000.00000000000
r = 1000.00000000000
x = 1001.00000000000
r = 1001.00000000000
with gfortran 4.2.3 and
x = 1000.00000000000000
r = 1000.00000000000000
x = 1001.0000000000000
r = 1001.0000000000000
with 4.3.2 and 4.4.0 (trunk). Is this expected?
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37472