replaced mpfr_can_round (approx, err, rnd1, GMP_RNDN, prec)

by       mpfr_can_round (approx, err, rnd1, GMP_RNDZ, prec + 1)
which in addition guarantees a correct inexact flag


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

1 files changed, 2 insertions, 1 deletions

diff --git a/asinh.c b/asinh.c
index 93830d2d7..2a110787a 100644
--- a/asinh.c
+++ b/asinh.c
@@ -102,7 +102,8 @@ mpfr_asinh (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode)
       /* actualisation of the precision */
       Nt += 10;
     }
-  while ((err < 0) || (!mpfr_can_round (t, err, GMP_RNDN, rnd_mode, Ny)
+  while ((err < 0) || (!mpfr_can_round (t, err, GMP_RNDN, GMP_RNDZ,
+                                        Ny + (rnd_mode == GMP_RNDN))
                        || MPFR_IS_ZERO(t)));
 
   mpfr_restore_emin_emax ();