Take into account Inf, Nans ; clear the flags of the return variable

in most function calls.


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

1 files changed, 3 insertions, 0 deletions

diff --git a/log.c b/log.c
index 3240aa4c1..419ad5e0b 100644
--- a/log.c
+++ b/log.c
@@ -76,6 +76,9 @@ mpfr_log(r, a, rnd_mode)
       MPFR_SET_INF(r); if (MPFR_SIGN(r) != 1) { MPFR_CHANGE_SIGN(r); }
     }
 
+  /* Now we can clear the flags without damage even if r == a */
+  MPFR_CLEAR_FLAGS(r); 
+
   /* If a is 1, the result is 0 */
   if (mpfr_cmp_ui_2exp(a,1,0)==0){
     MPFR_SET_ZERO(r);