[Bug fortran/48979] FRACTION und EXPONENT return invalid results for infinity/NaN

[fxcoudert at gcc dot gnu.org]

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

--- Comment #18 from Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> ---
Author: fxcoudert
Date: Sat Oct 11 16:57:32 2014
New Revision: 216120

URL: https://gcc.gnu.org/viewcvs?rev=216120&root=gcc&view=rev
Log:
    PR fortran/48979

    * simplify.c (gfc_simplify_atan): Use mpfr_zero_p to check for zeros.
    (gfc_simplify_log): Likewise.
    (gfc_simplify_scale): Likewise.
    (gfc_simplify_exponent): Handle infinities and NaNs.
    (gfc_simplify_fraction): Handle infinities.
    (gfc_simplify_rrspacing): Handle signed zeros and NaNs.
    (gfc_simplify_set_exponent): Handle infinities and NaNs.
    (gfc_simplify_spacing): Handle zeros, infinities and NaNs.

    * gfortran.dg/ieee/intrinsics_1.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/ieee/intrinsics_1.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/simplify.c
    trunk/gcc/testsuite/ChangeLog