summaryrefslogtreecommitdiff
path: root/exp_2.c
diff options
context:
space:
mode:
authorpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2005-05-20 09:30:19 +0000
committerpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2005-05-20 09:30:19 +0000
commit85be8bc179a3cfc16a5a461485002216235c32c9 (patch)
tree4267f4392debef709f2306d6137f90caee8b42b8 /exp_2.c
parentb88c50d268e5e11da7c3363d421246dbb14bc180 (diff)
downloadmpfr-85be8bc179a3cfc16a5a461485002216235c32c9.tar.gz
Remove variable t which wasn't used!
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@3594 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'exp_2.c')
-rw-r--r--exp_2.c7
1 files changed, 1 insertions, 6 deletions
diff --git a/exp_2.c b/exp_2.c
index 5d29992cf..19428b7ce 100644
--- a/exp_2.c
+++ b/exp_2.c
@@ -89,7 +89,7 @@ mpfr_exp_2 (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode)
mp_exp_t exps;
mp_prec_t q, precy;
int inexact;
- mpfr_t r, s, t;
+ mpfr_t r, s;
mpz_t ss;
MPFR_ZIV_DECL (loop);
MPFR_TMP_DECL(marker);
@@ -119,11 +119,8 @@ mpfr_exp_2 (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode)
/* add K extra bits, i.e. failure probability <= 1/2^K = O(1/precy) */
q = precy + err + K + 5;
- /*q = ( (q-1)/BITS_PER_MP_LIMB + 1) * BITS_PER_MP_LIMB; */
-
mpfr_init2 (r, q + error_r);
mpfr_init2 (s, q + error_r);
- mpfr_init2 (t, q);
/* the algorithm consists in computing an upper bound of exp(x) using
a precision of q bits, and see if we can round to MPFR_PREC(y) taking
@@ -221,13 +218,11 @@ mpfr_exp_2 (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode)
MPFR_ZIV_NEXT (loop, q);
mpfr_set_prec (r, q);
mpfr_set_prec (s, q);
- mpfr_set_prec (t, q);
}
MPFR_ZIV_FREE (loop);
mpfr_clear (r);
mpfr_clear (s);
- mpfr_clear (t);
return inexact;
}