gfortran 13 is ok

[jschueller]

I have gfortran 13 and everything is ok

$ gfortran --version
GNU Fortran (GCC) 13.2.1 20230801
...
===> gtest: Test completes successfully! <===

full output:
a.txt

[zaikunzhang]

Thank you @jschueller . Yes, gtest would pass. However, on my side, make test_eqv will fail with gfortran 13.1.0. Could you check?

[jschueller]

it fails:

$ make test_eqv
gfortran -Ofast test_eqv.f90 && ./a.out
              NaN              NaN               NaN                                                                                   
 x <= 0.0, y <= 0.0 x <= 0.0 .eqv. y <= 0.0 x <= 0.0 .neqv. y <= 0.0
 F F F F
 Wrong!
Note: The following floating-point exceptions are signalling: IEEE_INVALID_FLAG
STOP 1
make: *** [Makefile:102: test_eqv] Error 1

[jschueller]

is this a known bug ?

[zaikunzhang]

I will not call it a bug until the gfortran developers say so. Since we are using -Ofast, gfortran is allowed to do many things. Maybe it is allowed to produce results like this. See https://fortran-lang.discourse.group/t/is-this-expected/6486 .