changed name of mpz_set_fr to mpfr_get_z_exp

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

1 files changed, 1 insertions, 1 deletions

diff --git a/atan.c b/atan.c
index 765677b2e..94f410f2b 100644
--- a/atan.c
+++ b/atan.c
@@ -185,7 +185,7 @@ mpfr_atan (mpfr_ptr arctangent, mpfr_srcptr x, mp_rnd_t rnd_mode)
       mpfr_mul_2ui(tmp, sk, twopoweri, GMP_RNDN);
       /* Calculation of  trunc(tmp) --> mpz */
       mpfr_trunc (ukf, tmp);
-      exptol = mpz_set_fr (ukz, ukf);
+      exptol = mpfr_get_z_exp (ukz, ukf);
       if (exptol>0)
 	  mpz_mul_2exp (ukz, ukz, exptol);
       else