diff options
| author | Tobias Burnus <burnus@gcc.gnu.org> | 2019-11-27 10:16:24 +0100 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2019-11-27 10:16:24 +0100 |
| commit | 90ca6847bbd0c7b2debb5a985d7f49e464f68577 (patch) | |
| tree | 77faad3e0aaed75d74d5c9bba0e0f93db909089f /gcc/fortran | |
| parent | 1f9fae28095488a9accd1e7688116ed4d145b03f (diff) | |
| download | gcc-90ca6847bbd0c7b2debb5a985d7f49e464f68577.zip gcc-90ca6847bbd0c7b2debb5a985d7f49e464f68577.tar.gz gcc-90ca6847bbd0c7b2debb5a985d7f49e464f68577.tar.bz2 | |
PR 92463 - Cleanups due to minimum MPFR version bump to 3.1.0
PR middle-end/92463
* configure.ac: Use MPFR_RNDN instead of GMP's MP_RNDN.
* configure: Regenerate
gcc/
PR middle-end/92463
* builtins.c (do_mpfr_ckconv, do_mpc_ckconv, do_mpfr_remquo,
do_mpfr_lgamma_r, do_mpc_arg2): Use MPFR_RNDx instead of GMP_RNDx,
mpfr_rnd_t instead of mp_rnd_t.
* fold-const-call.c (do_mpfr_ckconv, do_mpfr_arg1, do_mpfr_sincos,
do_mpfr_arg2, do_mpfr_arg3, do_mpc_arg1, do_mpc_arg2): Likewise.
* gimple-ssa-sprintf.c (format_floating_max, format_floating):
Use mpfr_exp_t instead of mp_exp_t.
* real.c (real_from_string, dconst_e_ptr, dconst_sqrt2_ptr): Use
MPFR_RNDx instead of GMP_RNDx.
* realmpfr.c (real_from_mpfr, mpfr_from_real): Use mpfr_rnd_t and
mpfr_exp_t instead mp_rnd_t and mp_exp_t, respectively.
* realmpfr.h (real_from_mpfr, mpfr_from_real): Use mpfr_rnd_t instead
of mp_rnd_t and remove MPFR_RNDx poisoning.
* ubsan.c (ubsan_instrument_float_cast): MPFR_RNDx instead of GMP_RNDx.
fortran/
PR middle-end/92463
* arith.c (gfc_check_real_range): Replace mp_exp_t by mpfr_exp_t.
From-SVN: r278761
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/arith.c | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 71aacd2..2525250 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2019-11-27 Tobias Burnus <tobias@codesourcery.com> + + PR middle-end/92463 + * arith.c (gfc_check_real_range): Replace mp_exp_t by mpfr_exp_t. + 2019-11-25 Harald Anlauf <anlauf@gmx.de> PR fortran/92629 diff --git a/gcc/fortran/arith.c b/gcc/fortran/arith.c index cf48077..7f048da 100644 --- a/gcc/fortran/arith.c +++ b/gcc/fortran/arith.c @@ -385,8 +385,8 @@ gfc_check_real_range (mpfr_t p, int kind) /* Set emin and emax for the current model number. */ en = gfc_real_kinds[i].min_exponent - gfc_real_kinds[i].digits + 1; - mpfr_set_emin ((mp_exp_t) en); - mpfr_set_emax ((mp_exp_t) gfc_real_kinds[i].max_exponent); + mpfr_set_emin ((mpfr_exp_t) en); + mpfr_set_emax ((mpfr_exp_t) gfc_real_kinds[i].max_exponent); mpfr_check_range (q, 0, GFC_RND_MODE); mpfr_subnormalize (q, 0, GFC_RND_MODE); |