diff options
| author | Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> | 2016-09-22 11:33:25 +0000 |
|---|---|---|
| committer | Rainer Orth <ro@gcc.gnu.org> | 2016-09-22 11:33:25 +0000 |
| commit | b8ffdd9730b00a64e85eb2e3881b9006932b41bb (patch) | |
| tree | f81a91edccbbf4bdb5d2250eda03da3ec0502670 | |
| parent | 195d1431ff5b9903938f2ee1a6ed86df0cf9b115 (diff) | |
| download | gcc-b8ffdd9730b00a64e85eb2e3881b9006932b41bb.zip gcc-b8ffdd9730b00a64e85eb2e3881b9006932b41bb.tar.gz gcc-b8ffdd9730b00a64e85eb2e3881b9006932b41bb.tar.bz2 | |
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
| -rw-r--r-- | gcc/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/gimple-ssa-sprintf.c | 4 |
2 files changed, 8 insertions, 2 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 0b689ab..485d808 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,9 @@ +2016-09-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> + + * gimple-ssa-sprintf.c (format_floating_max): Use GMP_RNDN instead + of MPFR_RNDN. + (format_floating): Likewise. + 2016-09-22 Jakub Jelinek <jakub@redhat.com> PR fortran/77665 diff --git a/gcc/gimple-ssa-sprintf.c b/gcc/gimple-ssa-sprintf.c index dddb026..5ababe2 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; |