------- Comment #11 from burnus at gcc dot gnu dot org 2009-07-08 14:55 -------
Created an attachment (id=18158)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=18158&action=view)
Patch - lightly tested
Attached patch fixes the problem [independent of
"-f(no-)signed-zeros"/-ffast-math].
The crucial option is "-fno-sign-zero" (which shall not be confused with
-f(no-)signed-zeros):
$ gfortran -O3 -fno-sign-zero ahfj.f90 && ./a.out
With val = 0.0000000 test = 0.0000000
pass
--
burnus at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
AssignedTo|unassigned at gcc dot gnu |burnus at gcc dot gnu dot
|dot org |org
Status|NEW |ASSIGNED
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40675