diff options
| author | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2012-05-04 12:55:57 +0000 |
|---|---|---|
| committer | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2012-05-04 12:55:57 +0000 |
| commit | a6bd9c11b57eed42c8adb1fc0ab8bcb962898780 (patch) | |
| tree | 767665b80d6e2fb7f4e90dfdc4a98ac9f3fffb74 /tests/tgamma.c | |
| parent | 5d03b11c5a397270d6f94b934b29b9b8bdaf0919 (diff) | |
| download | mpfr-a6bd9c11b57eed42c8adb1fc0ab8bcb962898780.tar.gz | |
[src/lngamma.c] fixed endless loop with test cases introduced in r8188
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@8189 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tgamma.c')
| -rw-r--r-- | tests/tgamma.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/tgamma.c b/tests/tgamma.c index af974090b..63c8eab95 100644 --- a/tests/tgamma.c +++ b/tests/tgamma.c @@ -958,6 +958,12 @@ exp_lgamma_tests (void) exp_lgamma (x, 53, 64); mpfr_set_str (x, "-90.6308260837372266e+15", 10, MPFR_RNDN); exp_lgamma (x, 53, 64); + /* The following test gives a large positive result < +Inf */ + mpfr_set_str (x, "1.2b13fc45a92dea1@14", 16, MPFR_RNDN); + exp_lgamma (x, 53, 64); + /* Idem for a large negative result > -Inf */ + mpfr_set_str (x, "-1.2b13fc45a92de81@14", 16, MPFR_RNDN); + exp_lgamma (x, 53, 64); /* The following two tests trigger an endless loop in r8186 on 64-bit machines (64-bit exponent). The second one (due to undetected overflow) is a direct consequence of the |