summaryrefslogtreecommitdiff
path: root/sqr.c
diff options
context:
space:
mode:
authorpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2005-02-03 14:33:31 +0000
committerpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2005-02-03 14:33:31 +0000
commit62046052c1dc3667d6a1e863c362fbd3efa44860 (patch)
treefbcf47b298646aad75a01292a6b3b872d3a33346 /sqr.c
parent34bb3fcfda03b7f8de6dff6f1088193789fd80c6 (diff)
downloadmpfr-62046052c1dc3667d6a1e863c362fbd3efa44860.tar.gz
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
Diffstat (limited to 'sqr.c')
-rw-r--r--sqr.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/sqr.c b/sqr.c
index a9b99d335..df1e0e1b0 100644
--- a/sqr.c
+++ b/sqr.c
@@ -1,6 +1,6 @@
/* mpfr_sqr -- Floating square
-Copyright 2004 Free Software Foundation, Inc.
+Copyright 2004, 2005 Free Software Foundation, Inc.
This file is part of the MPFR Library.
@@ -87,7 +87,7 @@ mpfr_sqr (mpfr_ptr a, mpfr_srcptr b, mp_rnd_t rnd_mode)
{
mp_exp_t ax2 = ax + (mp_exp_t) (b1 - 1 + cc);
if (MPFR_UNLIKELY( ax2 > __gmpfr_emax))
- return mpfr_set_overflow (a, rnd_mode, MPFR_SIGN_POS);
+ return mpfr_overflow (a, rnd_mode, MPFR_SIGN_POS);
if (MPFR_UNLIKELY( ax2 < __gmpfr_emin))
{
/* In the rounding to the nearest mode, if the exponent of the exact
@@ -97,7 +97,7 @@ mpfr_sqr (mpfr_ptr a, mpfr_srcptr b, mp_rnd_t rnd_mode)
if (rnd_mode == GMP_RNDN &&
(ax + (mp_exp_t) b1 < __gmpfr_emin || mpfr_powerof2_raw (b)))
rnd_mode = GMP_RNDZ;
- return mpfr_set_underflow (a, rnd_mode, MPFR_SIGN_POS);
+ return mpfr_underflow (a, rnd_mode, MPFR_SIGN_POS);
}
MPFR_SET_EXP (a, ax2);
MPFR_SET_POS (a);