summaryrefslogtreecommitdiff
path: root/cos.c
diff options
context:
space:
mode:
authorvlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2007-06-20 11:32:56 +0000
committervlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2007-06-20 11:32:56 +0000
commit959665cff4517ee8e8c902edd7f011b055b308e7 (patch)
treec5b6bfddf87e2293cf965d8ac66528fcaba684ab /cos.c
parent6314124b93c5e1637f547954ac1f3e779e80c41b (diff)
downloadmpfr-959665cff4517ee8e8c902edd7f011b055b308e7.tar.gz
cos.c: use MPFR_SMALL_INPUT_AFTER_SAVE_EXPO instead of
MPFR_FAST_COMPUTE_IF_SMALL_INPUT. git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@4548 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'cos.c')
-rw-r--r--cos.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/cos.c b/cos.c
index 9b36c04f5..88c44adb6 100644
--- a/cos.c
+++ b/cos.c
@@ -203,8 +203,8 @@ mpfr_cos (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode)
MPFR_SAVE_EXPO_MARK (expo);
/* cos(x) = 1-x^2/2 + ..., so error < 2^(2*EXP(x)-1) */
- MPFR_FAST_COMPUTE_IF_SMALL_INPUT (y, __gmpfr_one, -2 * MPFR_GET_EXP (x), 1,
- 0, rnd_mode, inexact = _inexact; goto end);
+ MPFR_SMALL_INPUT_AFTER_SAVE_EXPO (y, __gmpfr_one, -2 * MPFR_GET_EXP (x),
+ 1, 0, rnd_mode, expo, {});
/* Compute initial precision */
precy = MPFR_PREC (y);
@@ -282,7 +282,6 @@ mpfr_cos (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode)
inexact = mpfr_set (y, s, rnd_mode);
MPFR_GROUP_CLEAR (group);
- end:
MPFR_SAVE_EXPO_FREE (expo);
return mpfr_check_range (y, inexact, rnd_mode);
}