diff options
| author | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2014-01-17 23:08:56 +0000 |
|---|---|---|
| committer | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2014-01-17 23:08:56 +0000 |
| commit | 17e377b87a78b42341fa0feafb33a30121ac5849 (patch) | |
| tree | 9a80c5d918d68816e868620df42c961ae9762687 | |
| parent | ea192952b341fab0134ad46ff1e7c8c7d4195ebb (diff) | |
| download | mpfr-17e377b87a78b42341fa0feafb33a30121ac5849.tar.gz | |
[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
| -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); |