summaryrefslogtreecommitdiff
path: root/tests/tests.c
diff options
context:
space:
mode:
authorvlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2008-02-08 16:23:31 +0000
committervlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2008-02-08 16:23:31 +0000
commit7b3e44485b7856a921776ba7172c03b0f1df6e67 (patch)
tree933c706d414d555acc5ec058b82b9473ca5a7ace /tests/tests.c
parent79b16c555ebdeed49c726fb5e3593863ba5e89ed (diff)
downloadmpfr-7b3e44485b7856a921776ba7172c03b0f1df6e67.tar.gz
tests/tests.c: fixed assertion failure introduced in r5265.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@5271 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tests.c')
-rw-r--r--tests/tests.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/tests.c b/tests/tests.c
index 0c5c85407..6708c379a 100644
--- a/tests/tests.c
+++ b/tests/tests.c
@@ -474,7 +474,7 @@ tests_default_random (mpfr_ptr x, int pos, mp_exp_t emin, mp_exp_t emax)
can be done on 64-bit machines. */
mpfr_random (x);
- if (emin >= 1 || (randlimb () & 1))
+ if (MPFR_IS_PURE_FP (x) && (emin >= 1 || (randlimb () & 1)))
{
mp_exp_t e;
e = MPFR_EXP (x) + (emin + (long) (randlimb () % (emax - emin + 1)));