summaryrefslogtreecommitdiff
path: root/zeta.c
diff options
context:
space:
mode:
authorpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2003-11-21 16:26:19 +0000
committerpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2003-11-21 16:26:19 +0000
commit83c4428fadeab214993b680317a727cb1e2a50a1 (patch)
tree879c0082a45679d0e54946f5449d7762b58b38c3 /zeta.c
parent41d7b44241b63a451c3e664bdd9a640a4c255291 (diff)
downloadmpfr-83c4428fadeab214993b680317a727cb1e2a50a1.tar.gz
Remove some warnings and potential errors (Comparaison between signed and unsigned).
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@2563 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'zeta.c')
-rw-r--r--zeta.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/zeta.c b/zeta.c
index 75c273134..d5c706492 100644
--- a/zeta.c
+++ b/zeta.c
@@ -159,11 +159,11 @@ mpfr_zeta_part_a (mpfr_t sum, mpfr_srcptr s, int n)
static int
mpfr_zeta_pos (mpfr_t z, mpfr_srcptr s, mp_rnd_t rnd_mode)
{
- int p, n, l, dint, add, d, can_round;
+ int p, n, l, add, can_round;
double beta, sd, dnep;
mpfr_t a, b, c, z_pre, f, g, s1;
mpfr_t *tc1;
- mp_prec_t precz, precs;
+ mp_prec_t precz, precs, d, dint;
int inex;
precz = mpfr_get_prec (z);
@@ -195,7 +195,7 @@ mpfr_zeta_pos (mpfr_t z, mpfr_srcptr s, mp_rnd_t rnd_mode)
inex = 0;
goto clear_and_return;
}
- else if (MPFR_GET_EXP (s1) <= -(d-3)/2)
+ else if (MPFR_GET_EXP (s1) <= -(mp_exp_t) ((mpfr_prec_t) (d-3)/2))
/* Branch 1: when s-1 is very small, one
uses the approximation Zeta(s)=1/(s-1)+gamma,
where gamma is Euler's constant */