From 17e377b87a78b42341fa0feafb33a30121ac5849 Mon Sep 17 00:00:00 2001 From: vlefevre Date: Fri, 17 Jan 2014 23:08:56 +0000 Subject: [src/lngamma.c] Added a MPFR_LOG_FUNC. git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@8768 280ebfd0-de03-0410-8827-d642c229c3f4 --- src/lngamma.c | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/src/lngamma.c b/src/lngamma.c index 2165c2bc9..44762a68d 100644 --- a/src/lngamma.c +++ b/src/lngamma.c @@ -172,6 +172,11 @@ GAMMA_FUNC (mpfr_ptr y, mpfr_srcptr z0, mpfr_rnd_t rnd) MPFR_SAVE_EXPO_DECL (expo); MPFR_ZIV_DECL (loop); + MPFR_LOG_FUNC + (("x[%Pu]=%.*Rg rnd=%d", mpfr_get_prec (z0), mpfr_log_prec, z0, rnd), + ("y[%Pu]=%.*Rg inexact=%d", + mpfr_get_prec (y), mpfr_log_prec, y, inexact)); + compared = mpfr_cmp_ui (z0, 1); MPFR_SAVE_EXPO_MARK (expo); -- cgit v1.2.1