From a573a476f751b595a9404b0909be735f88845a61 Mon Sep 17 00:00:00 2001
From: zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>
Date: Wed, 28 Sep 2005 14:14:42 +0000
Subject: fixed infinite loop for lngamma(2)

git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@3871 280ebfd0-de03-0410-8827-d642c229c3f4
---
 tests/tlngamma.c | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'tests/tlngamma.c')

diff --git a/tests/tlngamma.c b/tests/tlngamma.c
index a4e421ba3..3e012091c 100644
--- a/tests/tlngamma.c
+++ b/tests/tlngamma.c
@@ -93,6 +93,14 @@ special (void)
       exit (1);
     }
 
+  mpfr_set_ui (x, 2, GMP_RNDN);
+  mpfr_lngamma (y, x, GMP_RNDN);
+  if (mpfr_cmp_ui (y, 0))
+    {
+      printf ("Error for lngamma(2)\n");
+      exit (1);
+    }
+
   mpfr_set_prec (x, 53);
   mpfr_set_prec (y, 53);
 
-- 
cgit v1.2.1