------- Comment #2 from ro at CeBiTec dot Uni-Bielefeld dot DE 2010-06-15
14:09 -------
Subject: Re: 32-bit gfortran.dg/atan2_1.f90 fails on Solaris 1[01]/x86 at -O0
> ------- Comment #1 from fxcoudert at gcc dot gnu dot org 2010-06-11 13:51
> -------
>> if(atan(1.0, i/10.0) -atan2(1.0, i/10.) /= 0.0) call abort()
>
> Try to change that into a "print *, atan(1.0, i/10.0) -atan2(1.0, i/10.)"
> and see what it outputs.
Only changing the first line, I get
-4.35482832E-08
Abort
Changing the second line, too, gives
-4.35482832E-08
-1.08094956596804792E-016
4.33012666E-08
4.38017677684143791E-017
3.05452623E-08
3.33934269125535366E-017
2.96684455E-08
-5.76795555762288359E-017
4.87235496E-08
-9.40003283544932344E-017
-1.70394934E-08
2.55871712706579046E-017
1.22149613E-09
-3.88144377749810587E-017
2.30690667E-08
-2.16840434497100887E-018
-1.41206291E-08
-8.18572640226555848E-018
2.18556941E-08
-3.06287113727155003E-017
Rainer
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44448
