[Bug libfortran/32841] [4.3 regression] HUGE(1.0_16) output as +Infinity on ppc-darwin8

[fxcoudert at gcc dot gnu dot org]

------- Comment #25 from fxcoudert at gcc dot gnu dot org  2007-09-29 23:20 
-------
I should have posted my reduced testcase, so that I don't lose it:

real(16) :: y
y=huge(y)
write(*,"(G60.50E4)") y
write(*,"(G60.50E4)") nearest(y,1.)
end


-- 


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