re PR libquadmath/55462 (FAIL: gfortran.dg/quad_2.f90 -O* execution test after...

2012-11-25  Tobias Burnus  <burnus@net-b.de>

        PR libquadmath/55462
        * strtod/strtod_l.c (round_and_return): Use HAVE_FENV_H
        instead of nonexisting HAVE_GET_ROUNDING_MODE.

From-SVN: r193796

diff --git a/libquadmath/ChangeLog b/libquadmath/ChangeLog
index 365c4bb0d559a3ffd8a5259d115970c99d2684e7..8b052dcf3903a8bd9f7ce4ba9b685563d3daf7d4 100644 (file)
--- a/libquadmath/ChangeLog
+++ b/libquadmath/ChangeLog
@@ -1,3 +1,9 @@
+2012-11-25  Tobias Burnus  <burnus@net-b.de>
+
+       PR libquadmath/55462
+       * strtod/strtod_l.c (round_and_return): Use HAVE_FENV_H
+       instead of nonexisting HAVE_GET_ROUNDING_MODE.
+
 2012-11-23  H.J. Lu  <hongjiu.lu@intel.com>
 
        PR bootstrap/55455

diff --git a/libquadmath/strtod/strtod_l.c b/libquadmath/strtod/strtod_l.c
index 5e3321fd7429f433037536ebf66a5cc5ee8ff973..cd0c1f2da252da0deee315ea7b5d6d13c9453b6b 100644 (file)
--- a/libquadmath/strtod/strtod_l.c
+++ b/libquadmath/strtod/strtod_l.c
@@ -223,7 +223,7 @@ round_and_return (mp_limb_t *retval, intmax_t exponent, int negative,
        }
       else if (shift > 0)
        {
-#ifdef HAVE_GET_ROUNDING_MODE
+#ifdef HAVE_FENV_H
          if (TININESS_AFTER_ROUNDING && shift == 1)
            {
              /* Whether the result counts as tiny depends on whether,
@@ -279,7 +279,7 @@ round_and_return (mp_limb_t *retval, intmax_t exponent, int negative,
   if (exponent > MAX_EXP)
     goto overflow;
 
-#ifdef HAVE_GET_ROUNDING_MODE
+#ifdef HAVE_FENV_H
   if (round_away (negative,
                  (retval[0] & 1) != 0,
                  (round_limb & (((mp_limb_t) 1) << round_bit)) != 0,