diff options
| author | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2009-06-26 15:19:14 +0000 |
|---|---|---|
| committer | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2009-06-26 15:19:14 +0000 |
| commit | 0a7b8e19cf4789f503f55b4e046327c38ab786b3 (patch) | |
| tree | 991b78c9e2f3820a4c5c85c5ed78c6ba4b5fb168 /tests | |
| parent | 650a1c2467e6c10d24eba4428fd6784c5e7a6131 (diff) | |
| download | mpfr-0a7b8e19cf4789f503f55b4e046327c38ab786b3.tar.gz | |
Suppressed MPFR_CLEAR_FLAGS (no longer did anything).
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@6294 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/random2.c | 2 | ||||
| -rw-r--r-- | tests/tadd.c | 1 | ||||
| -rw-r--r-- | tests/tdiv.c | 4 | ||||
| -rw-r--r-- | tests/tsqrt.c | 3 | ||||
| -rw-r--r-- | tests/tui_div.c | 2 |
5 files changed, 0 insertions, 12 deletions
diff --git a/tests/random2.c b/tests/random2.c index 2815ad5b3..2426ae463 100644 --- a/tests/random2.c +++ b/tests/random2.c @@ -40,8 +40,6 @@ mpfr_random2 (mpfr_ptr x, mp_size_t size, mp_exp_t exp, mp_limb_t elimb, ran, acc; int ran_nbits, bit_pos, nb; - MPFR_CLEAR_FLAGS (x); - if (MPFR_UNLIKELY(size == 0)) { MPFR_SET_ZERO (x); diff --git a/tests/tadd.c b/tests/tadd.c index 306f20aa4..9523b0695 100644 --- a/tests/tadd.c +++ b/tests/tadd.c @@ -50,7 +50,6 @@ test_add (mpfr_ptr a, mpfr_srcptr b, mpfr_srcptr c, mp_rnd_t rnd_mode) res = mpfr_add (a, b, c, rnd_mode); else { - MPFR_CLEAR_FLAGS(a); /* clear flags */ if (MPFR_GET_EXP(b) < MPFR_GET_EXP(c)) res = mpfr_add1(a, c, b, rnd_mode); else diff --git a/tests/tdiv.c b/tests/tdiv.c index 5d201345d..9bfd1e440 100644 --- a/tests/tdiv.c +++ b/tests/tdiv.c @@ -650,7 +650,6 @@ check_nan (void) MPFR_ASSERTN (mpfr_nan_p (q)); /* +inf/1 == +inf */ - MPFR_CLEAR_FLAGS (a); MPFR_SET_INF (a); MPFR_SET_POS (a); mpfr_set_ui (d, 1L, MPFR_RNDN); @@ -660,7 +659,6 @@ check_nan (void) /* 1/+inf == 0 */ mpfr_set_ui (a, 1L, MPFR_RNDN); - MPFR_CLEAR_FLAGS (d); MPFR_SET_INF (d); MPFR_SET_POS (d); MPFR_ASSERTN (test_div (q, a, d, MPFR_RNDZ) == 0); /* exact */ @@ -674,10 +672,8 @@ check_nan (void) MPFR_ASSERTN (mpfr_nan_p (q)); /* +inf/+inf == nan */ - MPFR_CLEAR_FLAGS (a); MPFR_SET_INF (a); MPFR_SET_POS (a); - MPFR_CLEAR_FLAGS (d); MPFR_SET_INF (d); MPFR_SET_POS (d); MPFR_ASSERTN (test_div (q, a, d, MPFR_RNDZ) == 0); /* exact */ diff --git a/tests/tsqrt.c b/tests/tsqrt.c index fccfac057..3c0823b19 100644 --- a/tests/tsqrt.c +++ b/tests/tsqrt.c @@ -464,7 +464,6 @@ check_nan (void) mpfr_init2 (got, 100L); /* sqrt(NaN) == NaN */ - MPFR_CLEAR_FLAGS (x); MPFR_SET_NAN (x); MPFR_ASSERTN (test_sqrt (got, x, MPFR_RNDZ) == 0); /* exact */ MPFR_ASSERTN (mpfr_nan_p (got)); @@ -475,14 +474,12 @@ check_nan (void) MPFR_ASSERTN (mpfr_nan_p (got)); /* sqrt(+inf) == +inf */ - MPFR_CLEAR_FLAGS (x); MPFR_SET_INF (x); MPFR_SET_POS (x); MPFR_ASSERTN (test_sqrt (got, x, MPFR_RNDZ) == 0); /* exact */ MPFR_ASSERTN (mpfr_inf_p (got)); /* sqrt(-inf) == NaN */ - MPFR_CLEAR_FLAGS (x); MPFR_SET_INF (x); MPFR_SET_NEG (x); MPFR_ASSERTN (test_sqrt (got, x, MPFR_RNDZ) == 0); /* exact */ diff --git a/tests/tui_div.c b/tests/tui_div.c index ec5acdcfd..30f1ac31b 100644 --- a/tests/tui_div.c +++ b/tests/tui_div.c @@ -110,7 +110,6 @@ check_nan (void) mpfr_init2 (q, 100L); /* 1/+inf == 0 */ - MPFR_CLEAR_FLAGS (d); MPFR_SET_INF (d); MPFR_SET_POS (d); MPFR_ASSERTN (mpfr_ui_div (q, 1L, d, MPFR_RNDZ) == 0); /* exact */ @@ -118,7 +117,6 @@ check_nan (void) MPFR_ASSERTN (mpfr_sgn (q) == 0); /* 1/-inf == -0 */ - MPFR_CLEAR_FLAGS (d); MPFR_SET_INF (d); MPFR_SET_NEG (d); MPFR_ASSERTN (mpfr_ui_div (q, 1L, d, MPFR_RNDZ) == 0); /* exact */ |