mirror of git://gcc.gnu.org/git/gcc.git
realmpfr.h: Poison MPFR_RND{N,Z,U,D}.
* realmpfr.h: Poison MPFR_RND{N,Z,U,D}.
* gimple-ssa-sprintf.c (format_floating_max): Use GMP_RNDN
instead of MPFR_RNDN.
From-SVN: r244966
This commit is contained in:
parent
6ca513f9b2
commit
89dc4c9488
|
|
@ -1,3 +1,9 @@
|
||||||
|
2017-01-27 Jakub Jelinek <jakub@redhat.com>
|
||||||
|
|
||||||
|
* realmpfr.h: Poison MPFR_RND{N,Z,U,D}.
|
||||||
|
* gimple-ssa-sprintf.c (format_floating_max): Use GMP_RNDN
|
||||||
|
instead of MPFR_RNDN.
|
||||||
|
|
||||||
2017-01-27 Richard Earnshaw <rearnsha@arm.com>
|
2017-01-27 Richard Earnshaw <rearnsha@arm.com>
|
||||||
|
|
||||||
PR target/79239
|
PR target/79239
|
||||||
|
|
|
||||||
|
|
@ -1498,7 +1498,7 @@ format_floating_max (tree type, char spec, HOST_WIDE_INT prec)
|
||||||
round-to-nearest mode. */
|
round-to-nearest mode. */
|
||||||
mpfr_t x;
|
mpfr_t x;
|
||||||
mpfr_init2 (x, rfmt->p);
|
mpfr_init2 (x, rfmt->p);
|
||||||
mpfr_from_real (x, &rv, MPFR_RNDN);
|
mpfr_from_real (x, &rv, GMP_RNDN);
|
||||||
|
|
||||||
/* Return a value one greater to account for the leading minus sign. */
|
/* Return a value one greater to account for the leading minus sign. */
|
||||||
return 1 + get_mpfr_format_length (x, "", prec, spec, 'D');
|
return 1 + get_mpfr_format_length (x, "", prec, spec, 'D');
|
||||||
|
|
|
||||||
|
|
@ -32,5 +32,10 @@ extern void real_from_mpfr (REAL_VALUE_TYPE *, mpfr_srcptr,
|
||||||
const real_format *, mp_rnd_t);
|
const real_format *, mp_rnd_t);
|
||||||
extern void mpfr_from_real (mpfr_ptr, const REAL_VALUE_TYPE *, mp_rnd_t);
|
extern void mpfr_from_real (mpfr_ptr, const REAL_VALUE_TYPE *, mp_rnd_t);
|
||||||
|
|
||||||
#endif /* ! GCC_REALGMP_H */
|
#if (GCC_VERSION >= 3000)
|
||||||
|
/* For compatibility with mpfr 2.4 and earlier, we want to only use
|
||||||
|
GMP_RND*. */
|
||||||
|
#pragma GCC poison MPFR_RNDN MPFR_RNDZ MPFR_RNDU MPFR_RNDD
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#endif /* ! GCC_REALGMP_H */
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue