From b8ffdd9730b00a64e85eb2e3881b9006932b41bb Mon Sep 17 00:00:00 2001 From: Rainer Orth Date: Thu, 22 Sep 2016 11:33:25 +0000 Subject: [PATCH] Use GMP_RNDN for portability to MPFR 2.4.2 * gimple-ssa-sprintf.c (format_floating_max): Use GMP_RNDN instead of MPFR_RNDN. (format_floating): Likewise. From-SVN: r240350 --- gcc/ChangeLog | 6 ++++++ gcc/gimple-ssa-sprintf.c | 4 ++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 0b689ab86df..485d80887b8 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,9 @@ +2016-09-22 Rainer Orth + + * gimple-ssa-sprintf.c (format_floating_max): Use GMP_RNDN instead + of MPFR_RNDN. + (format_floating): Likewise. + 2016-09-22 Jakub Jelinek PR fortran/77665 diff --git a/gcc/gimple-ssa-sprintf.c b/gcc/gimple-ssa-sprintf.c index dddb026b27f..5ababe2f2aa 100644 --- a/gcc/gimple-ssa-sprintf.c +++ b/gcc/gimple-ssa-sprintf.c @@ -1125,7 +1125,7 @@ format_floating_max (tree type, char spec) round-to-nearest mode. */ mpfr_t x; mpfr_init2 (x, rfmt->p); - mpfr_from_real (x, &rv, MPFR_RNDN); + mpfr_from_real (x, &rv, GMP_RNDN); const char fmt[] = { '%', 'R', spec, '\0' }; int n = mpfr_snprintf (NULL, 0, fmt, x); @@ -1325,7 +1325,7 @@ format_floating (const conversion_spec &spec, tree arg) round-to-nearest mode. */ mpfr_t mpfrval; mpfr_init2 (mpfrval, rfmt->p); - mpfr_from_real (mpfrval, rvp, MPFR_RNDN); + mpfr_from_real (mpfrval, rvp, GMP_RNDN); char fmtstr [40]; char *pfmt = fmtstr; -- 2.30.2