From 06f792151f80bd77aff32929459b489711052b1d Mon Sep 17 00:00:00 2001 From: vlefevre Date: Wed, 9 Feb 2011 14:15:10 +0000 Subject: Added new types mpfr_limb_ptr and mpfr_limb_srcptr to src/mpfr-impl.h, and replaced mp_ptr and mp_srcptr (GMP internals) by these 2 new types respectively. git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@7455 280ebfd0-de03-0410-8827-d642c229c3f4 --- tune/speed.c | 12 ++++++------ tune/tuneup.c | 12 ++++++------ 2 files changed, 12 insertions(+), 12 deletions(-) (limited to 'tune') diff --git a/tune/speed.c b/tune/speed.c index 7fc8d45e8..c8c7206fd 100644 --- a/tune/speed.c +++ b/tune/speed.c @@ -47,7 +47,7 @@ int verbose; #define SPEED_MPFR_FUNC(mean_fun) do { \ unsigned i; \ - mp_ptr wp; \ + mpfr_limb_ptr wp; \ double t; \ mpfr_t w, x; \ mp_size_t size; \ @@ -57,7 +57,7 @@ int verbose; SPEED_RESTRICT_COND (s->size <= MPFR_PREC_MAX); \ MPFR_TMP_MARK (marker); \ \ - size = (s->size-1)/GMP_NUMB_BITS+1; \ + size = (s->size-1)/GMP_NUMB_BITS+1; \ s->xp[size-1] |= MPFR_LIMB_HIGHBIT; \ MPFR_TMP_INIT1 (s->xp, x, s->size); \ MPFR_SET_EXP (x, 0); \ @@ -71,7 +71,7 @@ int verbose; speed_starttime (); \ i = s->reps; \ do \ - mean_fun (w, x, MPFR_RNDN); \ + mean_fun (w, x, MPFR_RNDN); \ while (--i != 0); \ t = speed_endtime (); \ \ @@ -81,7 +81,7 @@ int verbose; #define SPEED_MPFR_OP(mean_fun) do { \ unsigned i; \ - mp_ptr wp; \ + mpfr_limb_ptr wp; \ double t; \ mpfr_t w, x, y; \ mp_size_t size; \ @@ -91,7 +91,7 @@ int verbose; SPEED_RESTRICT_COND (s->size <= MPFR_PREC_MAX); \ MPFR_TMP_MARK (marker); \ \ - size = (s->size-1)/GMP_NUMB_BITS+1; \ + size = (s->size-1)/GMP_NUMB_BITS+1; \ s->xp[size-1] |= MPFR_LIMB_HIGHBIT; \ MPFR_TMP_INIT1 (s->xp, x, s->size); \ MPFR_SET_EXP (x, 0); \ @@ -109,7 +109,7 @@ int verbose; speed_starttime (); \ i = s->reps; \ do \ - mean_fun (w, x, y, MPFR_RNDN); \ + mean_fun (w, x, y, MPFR_RNDN); \ while (--i != 0); \ t = speed_endtime (); \ \ diff --git a/tune/tuneup.c b/tune/tuneup.c index caeef0578..19ae6bc3d 100644 --- a/tune/tuneup.c +++ b/tune/tuneup.c @@ -40,7 +40,7 @@ int verbose; do \ { \ unsigned i; \ - mp_ptr wp; \ + mpfr_limb_ptr wp; \ double t; \ mpfr_t w, x; \ mp_size_t size; \ @@ -78,7 +78,7 @@ int verbose; do \ { \ unsigned i; \ - mp_ptr vp, wp; \ + mpfr_limb_ptr vp, wp; \ double t; \ mpfr_t v, w, x; \ mp_size_t size; \ @@ -118,7 +118,7 @@ int verbose; do \ { \ unsigned i; \ - mp_ptr wp; \ + mpfr_limb_ptr wp; \ double t; \ mpfr_t w, x, y; \ mp_size_t size; \ @@ -156,11 +156,11 @@ int verbose; while (0) /* special template for mpfr_mul(a,b,b) */ -#define SPEED_MPFR_SQR(mean_fun) \ +#define SPEED_MPFR_SQR(mean_fun) \ do \ { \ unsigned i; \ - mp_ptr wp; \ + mpfr_limb_ptr wp; \ double t; \ mpfr_t w, x; \ mp_size_t size; \ @@ -202,7 +202,7 @@ int verbose; do \ { \ unsigned i; \ - mp_ptr wp; \ + mpfr_limb_ptr wp; \ double t; \ mpfr_t w, x; \ mp_size_t size; \ -- cgit v1.2.1