This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: nearest_1.f90 failure on i686-linux
- From: dominiq at lps dot ens dot fr (Dominique Dhumieres)
- To: dominiq at lps dot ens dot fr, sgk at troutmask dot apl dot washington dot edu
- Cc: fortran at gcc dot gnu dot org
- Date: Tue, 10 Oct 2006 11:16:32 +0200 (CEST)
- Subject: Re: nearest_1.f90 failure on i686-linux
> At this point, the only recommendation I have is open another
> PR and hope a middle-end person can determine the problem.
This PR29410 with the following example:
program chop
integer ix, iy
real x, y
x = 1.
y = x
ix = transfer(x,ix)
iy = transfer(y,iy)
print '(2z20.8)', ix, iy
if (ix /= iy) call abort
end program chop
So the bug is not related to NEAREST() nor subnormal arithmetic
as I suspected, but to the optimization around TRANSFER().
Thanks
Dominique