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/asin.c b/asin.c
index 555f9d7d5..b0567480f 100644
--- a/asin.c
+++ b/asin.c
@@ -108,7 +108,8 @@ mpfr_asin (mpfr_ptr asin, mpfr_srcptr x, mp_rnd_t rnd_mode)
       mpfr_sqrt (tmp, tmp, GMP_RNDN);
       mpfr_div (tmp, x, tmp, GMP_RNDN);
       mpfr_atan (arcs, tmp, GMP_RNDN);
-      if (mpfr_can_round (arcs, realprec, GMP_RNDN, rnd_mode, MPFR_PREC(asin)))
+      if (mpfr_can_round (arcs, realprec, GMP_RNDN, GMP_RNDZ,
+                          MPFR_PREC(asin) + (rnd_mode == GMP_RNDN)))
 	{
 	  inexact = mpfr_set (asin, arcs, rnd_mode);
 	  good = 1;