[Bug fortran/33296] New: nearest(huge(1.0),1.0) gives an error

["dominiq at lps dot ens dot fr" <gcc-bugzilla at gcc dot gnu dot org>]

The following code:

real x
x = nearest(huge(1.0),1.0)
end

gives

x = nearest(huge(1.0),1.0)
           1
Error: Result of NEAREST overflows its kind at (1)

instead of setting x to +Inf. This bug is also present in GNU F95 version
4.2.1.


-- 
           Summary: nearest(huge(1.0),1.0) gives an error
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: dominiq at lps dot ens dot fr
GCC target triplet: powerpc-apple-darwin8


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