summaryrefslogtreecommitdiff
path: root/get_ld.c
diff options
context:
space:
mode:
authorzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2009-03-03 16:51:07 +0000
committerzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2009-03-03 16:51:07 +0000
commitf5f7883fc7cf47d38ed493a882fd7109bdd589bb (patch)
tree1058cf0d07593fa2cec9f32b4988ac40611b4bff /get_ld.c
parentcbd40e1cb659b579e608afbe7a05da5b15a860be (diff)
downloadmpfr-f5f7883fc7cf47d38ed493a882fd7109bdd589bb.tar.gz
GMP_RNDX -> MPFR_RNDX
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@6053 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'get_ld.c')
-rw-r--r--get_ld.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/get_ld.c b/get_ld.c
index 757fd2d2c..46cefb34e 100644
--- a/get_ld.c
+++ b/get_ld.c
@@ -56,10 +56,10 @@ mpfr_get_ld (mpfr_srcptr x, mp_rnd_t rnd_mode)
r = 0.0;
do {
- s = mpfr_get_d (y, GMP_RNDN); /* high part of y */
+ s = mpfr_get_d (y, MPFR_RNDN); /* high part of y */
r += (long double) s;
- mpfr_set_d (z, s, GMP_RNDN); /* exact */
- mpfr_sub (y, y, z, GMP_RNDN); /* exact */
+ mpfr_set_d (z, s, MPFR_RNDN); /* exact */
+ mpfr_sub (y, y, z, MPFR_RNDN); /* exact */
} while (!MPFR_IS_ZERO (y));
mpfr_clear (z);
@@ -115,7 +115,7 @@ mpfr_get_ld (mpfr_srcptr x, mp_rnd_t rnd_mode)
mpfr_init2 (tmp, MPFR_LDBL_MANT_DIG);
mpfr_subnormalize(tmp, mpfr_set (tmp, x, rnd_mode), rnd_mode);
- mpfr_prec_round (tmp, 64, GMP_RNDZ); /* exact */
+ mpfr_prec_round (tmp, 64, MPFR_RNDZ); /* exact */
if (MPFR_UNLIKELY (MPFR_IS_SINGULAR (tmp)))
ld.ld = (long double) mpfr_get_d (tmp, rnd_mode);
else