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/atanh.c b/atanh.c
index af9c98fb8..f7b26c890 100644
--- a/atanh.c
+++ b/atanh.c
@@ -103,8 +103,7 @@ mpfr_atanh (mpfr_ptr y, mpfr_srcptr xt , mp_rnd_t rnd_mode)
       err = Nt - (MAX (4 - MPFR_GET_EXP (t), 0) + 1);
       
       if (MPFR_LIKELY (MPFR_IS_ZERO (t)
-		       || mpfr_can_round (t, err, GMP_RNDN, GMP_RNDZ,
-					  Ny + (rnd_mode == GMP_RNDN))))
+		       || MPFR_CAN_ROUND (t, err, Ny, rnd_mode)))
 	break;
 
       /* reactualisation of the precision */