Some minor optimizations.

Optimization of mul.c / sub1.c.
Some clean up in the header files.


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

1 files changed, 3 insertions, 3 deletions

diff --git a/get_d.c b/get_d.c
index 5bd2851e7..d55fe33f1 100644
--- a/get_d.c
+++ b/get_d.c
@@ -232,14 +232,14 @@ mpfr_get_d3 (mpfr_srcptr src, mp_exp_t e, mp_rnd_t rnd_mode)
 double
 mpfr_get_d (mpfr_srcptr src, mp_rnd_t rnd_mode)
 {
-  return mpfr_get_d3 (src, MPFR_IS_FP(src) && MPFR_NOTZERO(src) ?
+  return mpfr_get_d3 (src, MPFR_IS_PURE_FP(src) ?
                       MPFR_GET_EXP (src) : 0, rnd_mode);
 }
 
 double
 mpfr_get_d1 (mpfr_srcptr src)
 {
-  return mpfr_get_d3 (src, MPFR_IS_FP(src) && MPFR_NOTZERO(src) ?
+  return mpfr_get_d3 (src, MPFR_IS_PURE_FP(src) ?
                       MPFR_GET_EXP (src) : 0, __gmpfr_default_rounding_mode);
 }
 
@@ -251,7 +251,7 @@ mpfr_get_d_2exp (long *expptr, mpfr_srcptr src, mp_rnd_t rnd_mode)
 
   ret = mpfr_get_d3 (src, 0, rnd_mode);
 
-  if (MPFR_IS_FP(src) && MPFR_NOTZERO(src))
+  if (MPFR_IS_PURE_FP(src))
     {
       exp = MPFR_GET_EXP (src);