http://gcc.gnu.org/bugzilla/show_bug.cgi?id=59227

--- Comment #4 from Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> ---
What does this output, when compiled with "-fno-range-check
-ffree-line-length-none -O0"?

$ cat test.f90
program test
  real(kind=16) :: x
  x = 12
  print *, erfc_scaled(real(12,kind=16))
  print *, erfc_scaled(x)
end program test

Reply via email to