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

diff --git a/eq.c b/eq.c
index f7eceb02a..004cf0667 100644
--- a/eq.c
+++ b/eq.c
@@ -73,6 +73,8 @@ mpfr_eq (u, v, n_bits)
     return (MPFR_IS_INF(v) && (usign == MPFR_SIGN(v))); 
   else if (MPFR_IS_INF(v)) return 0; 
 
+  if (MPFR_IS_NAN(u) || MPFR_IS_NAN(v)) return 0; 
+
   /* 2. Are the exponents different?  */
   if (uexp > vexp)
     return 0;			/* ??? handle (uexp = vexp + 1)   */