https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88678

--- Comment #6 from Steve Kargl <sgk at troutmask dot apl.washington.edu> ---
On Tue, Jan 08, 2019 at 08:37:11PM +0000, bergner at gcc dot gnu.org wrote:
> Confirmed.  I don't think the mentioned revision caused the problem, other 
> than
> adding a new test case that fails the same way.  I simplified test case fails
> for me with gcc 7.3.  I don't have anything older to test with.
> 
> bergner@pike:~/gcc/BUGS/PR88678$ cat bug.f90 
> program foo
>    use ieee_arithmetic
>    implicit none
>    real x
>    x = ieee_value(x, ieee_signaling_nan)
>    if (.not. ieee_is_nan(x)) stop 1
> end program foo

The backtrace in comment #2 has

#0  0x3fffb17f0477 in ???
#1  0x3fffb14f1694 in feenableexcept
 at ../sysdeps/powerpc/fpu/feenablxcpt.c:44
#2  0x3fffb1765e73 in __ieee_exceptions_MOD_ieee_support_halting
 at /home/seurer/gcc/gcc-test2/libgfortran/ieee/ieee_exceptions.F90:193

So, this is a better testcase.

program foo
  use ieee_arithmetic
  logical flag
  flag = ieee_supporting_halting(ieee_signaling_nan)
end program

Reply via email to