Replace mpfr_can_round (..., GMP_RNDN, GMP_RNDZ, ...) to fast replacement

mpfr_round_p.


git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@3388 280ebfd0-de03-0410-8827-d642c229c3f4

1 files changed, 1 insertions, 2 deletions

diff --git a/exp_2.c b/exp_2.c
index f1cf47495..77160c4b3 100644
--- a/exp_2.c
+++ b/exp_2.c
@@ -184,8 +184,7 @@ mpfr_exp_2 (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode)
       MPFR_LOG_VAR (s);
       MPFR_LOG_MSG (("err=%d bits\n", K));
       
-      if (mpfr_can_round (s, q - K, GMP_RNDN, GMP_RNDZ,
-			  precy + (rnd_mode == GMP_RNDN)) )
+      if (MPFR_LIKELY (MPFR_CAN_ROUND (s, q-K, precy, rnd_mode)))
 	break;
       MPFR_ZIV_NEXT (loop, q);
       mpfr_set_prec (r, q);