summaryrefslogtreecommitdiff
path: root/tan.c
diff options
context:
space:
mode:
authorpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2005-02-15 09:54:23 +0000
committerpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2005-02-15 09:54:23 +0000
commit24503ac68ee4f62422256794efda10983e1c8962 (patch)
tree33c5c4e95dc8c6879da30c21310e2a228d023158 /tan.c
parentf1c5d417a677d001e5a7cbc477fafd976c49602e (diff)
downloadmpfr-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.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/tan.c b/tan.c
index 48c953952..1287881f4 100644
--- a/tan.c
+++ b/tan.c
@@ -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;
}