diff options
-rw-r--r-- | src/lngamma.c | 5 |
1 files changed, 5 insertions, 0 deletions
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); |