diff options
| author | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2018-04-17 01:51:13 +0000 |
|---|---|---|
| committer | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2018-04-17 01:51:13 +0000 |
| commit | 2203e6799e515dc9a75b2ce70c40c0773e56c62c (patch) | |
| tree | 660632d67aeedf85e9586e4b3c9ab1fd31875615 /tests/tsqr.c | |
| parent | f570252f407b999b189a89bcca92ef74518c5df1 (diff) | |
| download | mpfr-2203e6799e515dc9a75b2ce70c40c0773e56c62c.tar.gz | |
Replaced mpfr_mul_2exp & mpfr_div_2exp by mpfr_mul_2ui & mpfr_div_2ui,
respectively (for the tests, except in reuse.c and in taway.c).
Note: As documented, mpfr_mul_2exp & mpfr_div_2exp are only kept for
compatibility with MPF; mpfr_mul_2ui & mpfr_div_2ui are preferred.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@12607 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tsqr.c')
| -rw-r--r-- | tests/tsqr.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/tsqr.c b/tests/tsqr.c index 3701c146d..2b1e64756 100644 --- a/tests/tsqr.c +++ b/tests/tsqr.c @@ -206,7 +206,7 @@ coverage (mpfr_prec_t pmax) /* exercise carry in most significant bits of a, with overflow */ mpfr_set_ui_2exp (b, 1, mpfr_get_emax (), MPFR_RNDZ); mpfr_sqrt (b, b, MPFR_RNDU); - mpfr_div_2exp (c, b, 1, MPFR_RNDN); + mpfr_div_2ui (c, b, 1, MPFR_RNDN); mpfr_sqr (c, c, MPFR_RNDN); mpfr_clear_flags (); inex = mpfr_sqr (a, b, MPFR_RNDN); @@ -229,7 +229,7 @@ coverage (mpfr_prec_t pmax) /* same as above, with RNDU */ mpfr_set_ui_2exp (b, 1, mpfr_get_emax (), MPFR_RNDZ); mpfr_sqrt (b, b, MPFR_RNDU); - mpfr_div_2exp (c, b, 1, MPFR_RNDN); + mpfr_div_2ui (c, b, 1, MPFR_RNDN); mpfr_sqr (c, c, MPFR_RNDU); mpfr_clear_flags (); inex = mpfr_sqr (a, b, MPFR_RNDU); @@ -252,7 +252,7 @@ coverage (mpfr_prec_t pmax) /* exercise trivial overflow */ mpfr_set_ui_2exp (b, 1, mpfr_get_emax (), MPFR_RNDZ); mpfr_sqrt (b, b, MPFR_RNDU); - mpfr_mul_2exp (b, b, 1, MPFR_RNDN); + mpfr_mul_2ui (b, b, 1, MPFR_RNDN); mpfr_clear_flags (); inex = mpfr_sqr (a, b, MPFR_RNDN); MPFR_ASSERTN(inex > 0); @@ -262,7 +262,7 @@ coverage (mpfr_prec_t pmax) /* exercise trivial underflow */ mpfr_set_ui_2exp (b, 1, mpfr_get_emin () - 1, MPFR_RNDZ); mpfr_sqrt (b, b, MPFR_RNDU); - mpfr_div_2exp (b, b, 1, MPFR_RNDN); + mpfr_div_2ui (b, b, 1, MPFR_RNDN); mpfr_clear_flags (); inex = mpfr_sqr (a, b, MPFR_RNDN); MPFR_ASSERTN(inex < 0); @@ -275,7 +275,7 @@ coverage (mpfr_prec_t pmax) mpfr_set_ui_2exp (b, 1, mpfr_get_emin () - 1, MPFR_RNDN); inex = mpfr_sqrt (b, b, MPFR_RNDZ); MPFR_ASSERTN(inex != 0); /* sqrt(2) is not exact */ - mpfr_mul_2exp (c, b, 1, MPFR_RNDN); + mpfr_mul_2ui (c, b, 1, MPFR_RNDN); mpfr_sqr (c, c, MPFR_RNDN); mpfr_clear_flags (); inex = mpfr_sqr (a, b, MPFR_RNDN); @@ -319,7 +319,7 @@ coverage (mpfr_prec_t pmax) mpfr_set_ui_2exp (b, 1, mpfr_get_emin () - 1, MPFR_RNDN); inex = mpfr_sqrt (b, b, MPFR_RNDZ); MPFR_ASSERTN(inex != 0); /* sqrt(2) is not exact */ - mpfr_mul_2exp (c, b, 1, MPFR_RNDN); + mpfr_mul_2ui (c, b, 1, MPFR_RNDN); mpfr_sqr (c, c, MPFR_RNDU); mpfr_clear_flags (); inex = mpfr_sqr (a, b, MPFR_RNDU); |