diff options
| author | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-03-14 09:50:29 +0000 |
|---|---|---|
| committer | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-03-14 09:50:29 +0000 |
| commit | 4cc3d7b6458a25fd58ae71c1091930fbd55cdf28 (patch) | |
| tree | 15cfc2b368672fedbc760aef8dae27babc9484a1 /const_pi.c | |
| parent | 106ab958c8bc8e64c63bac9bfb885a1ebca56053 (diff) | |
| download | mpfr-4cc3d7b6458a25fd58ae71c1091930fbd55cdf28.tar.gz | |
Replace mpfr_can_round (..., GMP_RNDN, GMP_RNDZ, ...) to fast replacement
mpfr_round_p.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@3388 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'const_pi.c')
| -rw-r--r-- | const_pi.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/const_pi.c b/const_pi.c index c2ae870ed..4e3237de6 100644 --- a/const_pi.c +++ b/const_pi.c @@ -93,8 +93,7 @@ mpfr_const_pi_internal (mpfr_ptr x, mp_rnd_t rnd_mode) mpfr_div (A, B, D, GMP_RNDN); /* MPFR_ASSERTN(p >= 2 * k + 8); */ - if (MPFR_LIKELY (mpfr_can_round (A, p - 2 * k - 8, GMP_RNDN, GMP_RNDZ, - px + (rnd_mode == GMP_RNDN)))) + if (MPFR_LIKELY (MPFR_CAN_ROUND (A, p - 2 * k - 8, px, rnd_mode))) break; p += kmax; |