+ Remove MPFR_CLEAR_NAN and MPFR_CLEAR_INF. Only use MPFR_CLEAR_FLAGS.

  MPFR_SET_INF, MPFR_SET_ZERO and MPFR_SET_ZERO must clear the flags before setting them.
+ Add a new test in tacosh.c : check Inf / Nan flags.
+ Use MPFR_IS_SINGULAR in all the remaining files.
+ Fix the use of MPFR_CLEAR_FLAGS.
+ mpfr-impl.h auto include gmp.h, gmp-impl.h, mpfr.h and limits.h.
+ Rename _PROTO to _MPFR_PROTO, and remove _GMP_PROTO.
+ Add MPFR_INT_SIGN macro.
+ Encapsulate a few more the sign.


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

1 files changed, 5 insertions, 5 deletions

diff --git a/gamma.c b/gamma.c
index b0613d471..39f8bd9cb 100644
--- a/gamma.c
+++ b/gamma.c
@@ -67,7 +67,7 @@ mpfr_gamma (mpfr_ptr gamma, mpfr_srcptr x, mp_rnd_t rnd_mode)
 	  MPFR_SET_NAN(gamma);
 	  MPFR_RET_NAN;
 	}
-      if (MPFR_IS_INF(x))
+      else if (MPFR_IS_INF(x))
 	{
 	  if (MPFR_IS_NEG(x))
 	    {
@@ -76,21 +76,21 @@ mpfr_gamma (mpfr_ptr gamma, mpfr_srcptr x, mp_rnd_t rnd_mode)
 	    }
 	  else
 	    {
-	      MPFR_CLEAR_NAN(gamma);
 	      MPFR_SET_INF(gamma);
 	      MPFR_SET_POS(gamma);
 	      return 0;  /* exact */
 	    }
 	}
-      if (MPFR_IS_ZERO(x))
+      else if (MPFR_IS_ZERO(x))
 	{
-	  MPFR_CLEAR_NAN(gamma);
 	  MPFR_SET_INF(gamma);
 	  MPFR_SET_SAME_SIGN(gamma, x);
 	  return 0;  /* exact */
 	}
-      MPFR_ASSERTN(1);
+      else
+	MPFR_ASSERTN(1);
     }
+  MPFR_CLEAR_FLAGS(gamma);
 
   /* Set x_p=x if x> 1 else set x_p=2-x */
   prec_gamma = MPFR_PREC (gamma);