diff options
| author | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2017-12-21 06:18:05 +0000 |
|---|---|---|
| committer | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2017-12-21 06:18:05 +0000 |
| commit | 862741a3e08ebd80f777ddd485c7619f7f7ae28d (patch) | |
| tree | 7ecd8a1399857a1be29916aa0bfa95bae21f162e /tests/tlngamma.c | |
| parent | cbb10f58363f7a72f32bf70b2cf4cac6df140b5f (diff) | |
| download | mpfr-862741a3e08ebd80f777ddd485c7619f7f7ae28d.tar.gz | |
[src/lngamma.c] fixed bug when u=0 in case z0 < 1
[tests/tlngamma.c] fixed test case which was wrong
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@12031 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tlngamma.c')
| -rw-r--r-- | tests/tlngamma.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/tlngamma.c b/tests/tlngamma.c index bbee1f718..bc2afb7da 100644 --- a/tests/tlngamma.c +++ b/tests/tlngamma.c @@ -297,10 +297,10 @@ bug20171220a (void) mpfr_set_str (x, "9.999962351340362288585900348170984233205352566408878552154832e-01", 10, MPFR_RNDN); inex = mpfr_lngamma (y, x, MPFR_RNDA); - /* lngamma(x) ~ -18.81, should be rounded to -32 */ - mpfr_set_si (z, -32, MPFR_RNDN); + /* lngamma(x) ~ 2.1731512683e0-6 ~ 2^-18.81, should be rounded to 2^-18 */ + mpfr_set_si_2exp (z, 1, -18, MPFR_RNDN); MPFR_ASSERTN(mpfr_equal_p (y, z)); - MPFR_ASSERTN(inex < 0); + MPFR_ASSERTN(inex > 0); mpfr_clear (x); mpfr_clear (y); |