summaryrefslogtreecommitdiff
path: root/sub_ui.c
diff options
context:
space:
mode:
authorvlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2002-01-20 00:17:27 +0000
committervlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2002-01-20 00:17:27 +0000
commit95eb0cf93a326dfb74927ab8e10c5956186a2ab5 (patch)
tree6dd3cb680ecc4dda8e34110f66047e14744dbfba /sub_ui.c
parent67bc3b6fccadfbbf4a273dab90e771e0027e76de (diff)
downloadmpfr-95eb0cf93a326dfb74927ab8e10c5956186a2ab5.tar.gz
New macro MPFR_RESTORE_RET.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@1662 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'sub_ui.c')
-rw-r--r--sub_ui.c17
1 files changed, 6 insertions, 11 deletions
diff --git a/sub_ui.c b/sub_ui.c
index cb18307d0..ce4b0bc63 100644
--- a/sub_ui.c
+++ b/sub_ui.c
@@ -1,6 +1,6 @@
/* mpfr_sub_ui -- subtract a floating-point number and a machine integer
-Copyright (C) 2000, 2001 Free Software Foundation, Inc.
+Copyright (C) 2000-2002 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 <stdio.h>
#include "gmp.h"
#include "gmp-impl.h"
#include "longlong.h"
@@ -34,22 +33,18 @@ mpfr_sub_ui (mpfr_ptr y, mpfr_srcptr x, unsigned long int u, mp_rnd_t rnd_mode)
mpfr_t uu;
mp_limb_t up[1];
unsigned long cnt;
- int inex_sub, inex_cr;
+ int inex;
MPFR_INIT1(up, uu, BITS_PER_MP_LIMB, 1);
count_leading_zeros(cnt, (mp_limb_t) u);
*up = (mp_limb_t) u << cnt;
- MPFR_EXP(uu) = BITS_PER_MP_LIMB-cnt;
+ MPFR_EXP(uu) = BITS_PER_MP_LIMB - cnt;
/* Optimization note: Exponent operations may be removed
- if mpfr_add works even when uu is out-of-range. */
+ if mpfr_sub works even when uu is out-of-range. */
mpfr_save_emin_emax();
- inex_sub = mpfr_sub (y, x, uu, rnd_mode);
- mpfr_restore_emin_emax();
- inex_cr = mpfr_check_range(y, rnd_mode);
- if (inex_cr)
- return inex_cr; /* underflow or overflow */
- MPFR_RET(inex_sub);
+ inex = mpfr_sub(y, x, uu, rnd_mode);
+ MPFR_RESTORE_RET(inex, y, rnd_mode);
}
else
return mpfr_set (y, x, rnd_mode);