diff options
author | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2020-03-25 20:24:23 +0000 |
---|---|---|
committer | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2020-03-25 20:24:23 +0000 |
commit | 7572f822b6dda7fc5f93d7136b5d73f9808417df (patch) | |
tree | 296b24c2af2915d5bf5b80a20f4db2c2cf2cfb79 | |
parent | da9f4c660a6e1161ec94f8e7bd799b3146fb9690 (diff) | |
download | mpfr-7572f822b6dda7fc5f93d7136b5d73f9808417df.tar.gz |
[tests/tsub.c] Fixed tests on UBF.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@13815 280ebfd0-de03-0410-8827-d642c229c3f4
-rw-r--r-- | tests/tsub.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/tsub.c b/tests/tsub.c index 2016d5da4..bc8787594 100644 --- a/tests/tsub.c +++ b/tests/tsub.c @@ -1338,18 +1338,19 @@ static void test_ubf_aux (void) e0 += 3; if (rnd == MPFR_RNDN) - d = i == 8 ? (e0 == __gmpfr_emin ? 3 : 4) : 6; + d = i == 8 ? (e0 == __gmpfr_emin - 1 ? 3 : 4) : 6; else if (MPFR_IS_LIKE_RNDZ (rnd, neg)) d = i == 8 ? 3 : 6; else - d = i == 8 ? 6 : 8; + d = i == 8 ? 4 : 8; mpfr_clear_flags (); inex_y = mpfr_set_si_2exp (w, sign * d, e0 - 3, (mpfr_rnd_t) rnd); flags_y = __gmpfr_flags | MPFR_FLAGS_INEXACT; if (inex_y == 0) - inex_y = rnd == MPFR_RNDN ? (i == 8 ? 1 : -1) : + inex_y = rnd == MPFR_RNDN ? + sign * (i == 8 ? 1 : -1) : MPFR_IS_LIKE_RNDD ((mpfr_rnd_t) rnd, sign) ? -1 : 1; mpfr_set (y, w, MPFR_RNDN); |