added round to away (still experimental)

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

1 files changed, 2 insertions, 1 deletions

diff --git a/exp.c b/exp.c
index 10e859c9c..6c99024a6 100644
--- a/exp.c
+++ b/exp.c
@@ -127,7 +127,8 @@ mpfr_exp (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode)
           __gmpfr_emin = 1;
           __gmpfr_emax = 1;
           mpfr_setmin (y, 1);  /* y = 1 */
-          if (MPFR_IS_POS_SIGN (signx) && rnd_mode == GMP_RNDU)
+          if (MPFR_IS_POS_SIGN (signx) && (rnd_mode == GMP_RNDU ||
+	                                   rnd_mode == GMP_RNDA))
             {
               mp_size_t yn;
               int sh;