diff options
author | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-02-15 09:54:23 +0000 |
---|---|---|
committer | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-02-15 09:54:23 +0000 |
commit | 24503ac68ee4f62422256794efda10983e1c8962 (patch) | |
tree | 33c5c4e95dc8c6879da30c21310e2a228d023158 /tan.c | |
parent | f1c5d417a677d001e5a7cbc477fafd976c49602e (diff) | |
download | mpfr-24503ac68ee4f62422256794efda10983e1c8962.tar.gz |
Use of MPFR_LOG_FUNC.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@3313 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tan.c')
-rw-r--r-- | tan.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -30,6 +30,9 @@ mpfr_tan (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode) mpfr_t s, c; MPFR_ZIV_DECL (loop); + MPFR_LOG_FUNC (("x[%#R]=%R rnd=%d", x, x, rnd_mode), + ("y[%#R]=%R inexact=%d", y, y, inexact)); + if (MPFR_UNLIKELY(MPFR_IS_SINGULAR(x))) { if (MPFR_IS_NAN(x) || MPFR_IS_INF(x)) @@ -45,7 +48,6 @@ mpfr_tan (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode) MPFR_RET(0); } } - MPFR_LOG_BEGIN (("x[%#R]=%R rnd=%d", x, x, rnd_mode)); precy = MPFR_PREC (y); m = precy + MPFR_INT_CEIL_LOG2 (precy) + 13; @@ -76,7 +78,5 @@ mpfr_tan (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode) mpfr_clear (s); mpfr_clear (c); - MPFR_LOG_END (("y[%#R]=%R inexact=%d", y, y, inexact)); - return inexact; } |