mirrors/gcc
1
0
Fork 0
mirror of https://gcc.gnu.org/git/gcc.git synced 2024-11-23 10:54:07 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

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

Browse Source 
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
This commit is contained in:
Tobias Burnus 2012-11-25 20:59:07 +01:00 committed by Tobias Burnus
parent 305a35dafb
commit 24a9cea6ef
2 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
libquadmath/ChangeLog
View File

@ -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

4
libquadmath/strtod/strtod_l.c
View File

@ -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,