replace obsolete mpz_div_2exp function by mpz_xdiv_q_2exp

git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@9702 280ebfd0-de03-0410-8827-d642c229c3f4

2 files changed, 3 insertions, 3 deletions

diff --git a/src/bernoulli.c b/src/bernoulli.c
index 7af1fdc9f..448d4274e 100644
--- a/src/bernoulli.c
+++ b/src/bernoulli.c
@@ -122,7 +122,7 @@ mpfr_bernoulli_internal (mpz_t *b, unsigned long n)
   /* add 1 which is 2^prec */
   mpz_add (s, s, u);
   /* add 1/2^n which is 2^(prec-n) */
-  mpz_div_2exp (u, u, n);
+  mpz_cdiv_q_2exp (u, u, n);
   mpz_add (s, s, u);
   /* now 2^prec * zeta(n) - p < s <= 2^prec * zeta(n) */
   /* multiply by n! */
diff --git a/src/div.c b/src/div.c
index 3770963fd..027e702f6 100644
--- a/src/div.c
+++ b/src/div.c
@@ -174,7 +174,7 @@ mpfr_div_with_mpz_tdiv_q (mpfr_ptr q, mpfr_srcptr u, mpfr_srcptr v,
   if (vp > wp)
     {
       k = vp - wp; /* truncate k bits of vm */
-      mpz_div_2exp (vm, vm, k);
+      mpz_tdiv_q_2exp (vm, vm, k);
       ve += k;
       vp -= k;
     }
@@ -186,7 +186,7 @@ mpfr_div_with_mpz_tdiv_q (mpfr_ptr q, mpfr_srcptr u, mpfr_srcptr v,
   if (up > vp + wp)
     {
       k = up - (vp + wp); /* truncate k bits of um */
-      mpz_div_2exp (um, um, k);
+      mpz_tdiv_q_2exp (um, um, k);
       ue += k;
       up -= k;
     }