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, 2 insertions, 0 deletions

diff --git a/set_f.c b/set_f.c
index 11ea6a5ec..6b82b0b7c 100644
--- a/set_f.c
+++ b/set_f.c
@@ -50,6 +50,8 @@ mpfr_set_f(y, x, rnd_mode)
       return;
     }
 
+  MPFR_CLEAR_FLAGS(y);
+
   TMP_MARK(marker);
   sx = ABS(SIZ(x)); sy = MPFR_ABSSIZE(y);
   my = MPFR_MANT(y); mx = MPFR_MANT(x);