From 2da0783d9f5d4124e0efea3de55384408e47937d Mon Sep 17 00:00:00 2001 From: vlefevre Date: Wed, 29 Jan 2014 23:43:47 +0000 Subject: =?UTF-8?q?[src]=20Add=20constants:=20=20=20*=20=5F=5Fgmpfr=5Fmone?= =?UTF-8?q?=20=3D=20-1=20=20=20*=20mpfr=5Fconst=5Flog2=5FRNDD=20=3D=20log(?= =?UTF-8?q?2)=20rounded=20down=20in=20precision=2064=20bits=20=20=20*=20mp?= =?UTF-8?q?fr=5Fconst=5Flog2=5FRNDU=20=3D=20log(2)=20rounded=20up=20in=20p?= =?UTF-8?q?recision=2064=20bits=20(modified=20patch=20from=20Patrick=20P?= =?UTF-8?q?=C3=A9lissier).?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@8913 280ebfd0-de03-0410-8827-d642c229c3f4 --- src/exp.c | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'src/exp.c') diff --git a/src/exp.c b/src/exp.c index f5a43a18d..902f59165 100644 --- a/src/exp.c +++ b/src/exp.c @@ -86,8 +86,9 @@ mpfr_exp (mpfr_ptr y, mpfr_srcptr x, mpfr_rnd_t rnd_mode) inexact = mpfr_set_exp_t (e, expo.saved_emax, MPFR_RNDN); MPFR_ASSERTD (inexact == 0); - mpfr_const_log2 (bound_emax, expo.saved_emax < 0 ? MPFR_RNDD : MPFR_RNDU); - mpfr_mul (bound_emax, bound_emax, e, MPFR_RNDU); + mpfr_mul (bound_emax, expo.saved_emax < 0 ? + __gmpfr_const_log2_RNDD : __gmpfr_const_log2_RNDU, + e, MPFR_RNDU); previous_emax = expo.saved_emax; MPFR_SAVE_EXPO_FREE (expo); } -- cgit v1.2.1