diff options
author | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2007-06-20 11:32:56 +0000 |
---|---|---|
committer | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2007-06-20 11:32:56 +0000 |
commit | 959665cff4517ee8e8c902edd7f011b055b308e7 (patch) | |
tree | c5b6bfddf87e2293cf965d8ac66528fcaba684ab /cos.c | |
parent | 6314124b93c5e1637f547954ac1f3e779e80c41b (diff) | |
download | mpfr-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.c | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -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); } |