------- Additional Comments From Thomas dot Koenig at online dot de 2005-01-07 10:56 ------- I am not sure that this is indeed a bug.
Is the result of nearest for +/- infinity defined to be +/huge ? Look at what ifort does: $ cat near-inf.f90 program test_nearest real inf inf = exp(1000.) print *,inf print *,nearest(inf,-1.0) print *,nearest(-inf,1.0) end $ ifort near-inf.f90 $ ./a.out Infinity Infinity -Infinity -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19302
