summaryrefslogtreecommitdiff
path: root/set_exp.c
diff options
context:
space:
mode:
authorvlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2003-05-22 21:39:40 +0000
committervlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2003-05-22 21:39:40 +0000
commit44b4dd94bb98c8d9e7850ae401232bd1b2ea3028 (patch)
tree9670f0ef8017d42ad2a2062dc08c63c022e450c8 /set_exp.c
parent2f3cb289a102043a22bd32c5950db37199fb3fd2 (diff)
downloadmpfr-44b4dd94bb98c8d9e7850ae401232bd1b2ea3028.tar.gz
Macros MPFR_EXP_INVALID (invalid exponent value) and MPFR_EXP_CHECK
added. Code update to use MPFR_GET_EXP and MPFR_SET_EXP instead of MPFR_EXP to allow more bug detection related to special values. Macros MPFR_SET_NAN, MPFR_SET_INF, MPFR_SET_ZERO and MPFR_INIT set the exponent of the number to MPFR_EXP_INVALID if MPFR_EXP_CHECK is defined. Compile with -DMPFR_EXP_CHECK and make check to see the potential problems; currently, 40 of 76 tests fail. git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@2301 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'set_exp.c')
-rw-r--r--set_exp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/set_exp.c b/set_exp.c
index e3793403a..8fc628554 100644
--- a/set_exp.c
+++ b/set_exp.c
@@ -1,6 +1,6 @@
/* mpfr_set_exp - set the exponent of a floating-point number
-Copyright 2002 Free Software Foundation.
+Copyright 2002, 2003 Free Software Foundation.
This file is part of the MPFR Library.
@@ -29,7 +29,7 @@ mpfr_set_exp (mpfr_ptr x, mp_exp_t exponent)
{
if (exponent >= __gmpfr_emin && exponent <= __gmpfr_emax)
{
- MPFR_EXP(x) = exponent;
+ MPFR_EXP(x) = exponent; /* do not use MPFR_SET_EXP of course... */
return 0;
}
else