The following code produces erroneous results with:

GNU Fortran 95 (GCC 4.0.0 20041010 (experimental))
Copyright (C) 2003 Free Software Foundation, Inc.

program real_test

real(kind=4) :: little
real(kind=8) :: big

little=1.0/3.0
big=2.0/3.0

print *, little
print *, big

print *, '1/3 and 2/3?'

end program real_test

The output is:

  0.3333333
  0.666666686534882
 1/3 and 2/3?

-- 
           Summary: Math error in simple divide operation
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: jvdelisle at verizon dot net
                CC: gcc-bugs at gcc dot gnu dot org
  GCC host triplet: i686-pc-linux-gnu


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

Reply via email to