Bug fixed concerning the flags.

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

1 files changed, 1 insertions, 0 deletions

diff --git a/set.c b/set.c
index 4556a672b..c82887929 100644
--- a/set.c
+++ b/set.c
@@ -46,6 +46,7 @@ mpfr_set4(a, b, rnd_mode, signb)
       if (MPFR_SIGN(a) * signb < 0) MPFR_CHANGE_SIGN(a); 
       return; 
     }
+  MPFR_CLEAR_FLAGS(a);
 
   carry = mpfr_round_raw(ap, MPFR_MANT(b), MPFR_PREC(b), (signb<0), preca, rnd_mode);
   MPFR_EXP(a) = MPFR_EXP(b);