Use GMP_RNDN for portability to MPFR 2.4.2
authorRainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
Thu, 22 Sep 2016 11:33:25 +0000 (11:33 +0000)
committerRainer Orth <ro@gcc.gnu.org>
Thu, 22 Sep 2016 11:33:25 +0000 (11:33 +0000)
* gimple-ssa-sprintf.c (format_floating_max): Use GMP_RNDN instead
of MPFR_RNDN.
(format_floating): Likewise.

From-SVN: r240350

gcc/ChangeLog
gcc/gimple-ssa-sprintf.c

index 0b689ab86df828a70fc5b6718547b7362ebdb97a..485d80887b87fb399364045e1ecafc6885c5b8a0 100644 (file)
@@ -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
index dddb026b27f05fc5d28e9b5c3cf74a19e2e98f88..5ababe2f2aa2d69e3f5d2b037a7eee4780eb1689 100644 (file)
@@ -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;