Rename internal functions mpfr_set_overflow in mpfr_overflow and

 mpfr_set_underflow in mpfr_underflow so that we can add new functions
mpfr_set_underflow and mpfr_set_overflow (which set the global flags).


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

1 files changed, 6 insertions, 7 deletions

diff --git a/add_one_ulp.c b/add_one_ulp.c
index 2444651ae..23ca5bce6 100644
--- a/add_one_ulp.c
+++ b/add_one_ulp.c
@@ -1,6 +1,6 @@
 /* mpfr_add_one_ulp -- add one unit in last place
 
-Copyright 1999, 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
+Copyright 1999, 2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
 
 This file is part of the MPFR Library.
 
@@ -19,7 +19,6 @@ along with the MPFR Library; see the file COPYING.LIB.  If not, write to
 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
 MA 02111-1307, USA. */
 
-
 #include "mpfr-impl.h"
 
 /* sets x to x+sign(x)*ulp(x) */
@@ -30,12 +29,12 @@ mpfr_add_one_ulp (mpfr_ptr x, mp_rnd_t rnd_mode)
   int sh;
   mp_limb_t *xp;
 
-  if (MPFR_UNLIKELY( MPFR_IS_SINGULAR(x) ))
+  if (MPFR_UNLIKELY (MPFR_IS_SINGULAR (x)))
     {
-      if (MPFR_IS_NAN(x))
+      if (MPFR_IS_NAN (x))
 	MPFR_RET_NAN;
-      MPFR_ASSERTD (MPFR_IS_INF(x) || MPFR_IS_ZERO(x));
-      MPFR_RET(0);
+      MPFR_ASSERTD (MPFR_IS_INF (x) || MPFR_IS_ZERO (x));
+      MPFR_RET (0);
     }
 
   xn = MPFR_LIMB_SIZE(x);
@@ -45,7 +44,7 @@ mpfr_add_one_ulp (mpfr_ptr x, mp_rnd_t rnd_mode)
     {
       mp_exp_t exp = MPFR_EXP (x);
       if (MPFR_UNLIKELY(exp == __gmpfr_emax))
-        return mpfr_set_overflow(x, rnd_mode, MPFR_SIGN(x));
+        return mpfr_overflow(x, rnd_mode, MPFR_SIGN(x));
       else
         {
           MPFR_ASSERTD (exp < __gmpfr_emax);