summaryrefslogtreecommitdiff
path: root/tuneup.c
diff options
context:
space:
mode:
authorpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2005-05-18 15:57:10 +0000
committerpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2005-05-18 15:57:10 +0000
commitb88c50d268e5e11da7c3363d421246dbb14bc180 (patch)
tree205a24fbfc48e8d135ec15b617d85335a673ad58 /tuneup.c
parente1bd5aef35c4619b29cf017d8128525d23bbdb56 (diff)
downloadmpfr-b88c50d268e5e11da7c3363d421246dbb14bc180.tar.gz
Replace TMP_ALLOC by MPFR_TMP_ALLOC
Replace TMP_DECL by MPFR_TMP_DECL Replace TMP_MARK by MPFR_TMP_MARK Replace TMP_FREE by MPFR_TMP_FREE Add support for GMP's TMP_SALLOC. git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@3593 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tuneup.c')
-rw-r--r--tuneup.c22
1 files changed, 11 insertions, 11 deletions
diff --git a/tuneup.c b/tuneup.c
index 04c83d0dd..c42852dbd 100644
--- a/tuneup.c
+++ b/tuneup.c
@@ -42,11 +42,11 @@ int verbose;
double t; \
mpfr_t w, x; \
mp_size_t size; \
- TMP_DECL (marker); \
+ MPFR_TMP_DECL (marker); \
\
SPEED_RESTRICT_COND (s->size >= MPFR_PREC_MIN); \
SPEED_RESTRICT_COND (s->size <= MPFR_PREC_MAX); \
- TMP_MARK (marker); \
+ MPFR_TMP_MARK (marker); \
\
size = (s->size-1)/BITS_PER_MP_LIMB+1; \
s->xp[size-1] |= MPFR_LIMB_HIGHBIT; \
@@ -66,7 +66,7 @@ int verbose;
while (--i != 0); \
t = speed_endtime (); \
\
- TMP_FREE (marker); \
+ MPFR_TMP_FREE (marker); \
return t; \
} while (0)
@@ -76,11 +76,11 @@ int verbose;
double t; \
mpfr_t w, x, y; \
mp_size_t size; \
- TMP_DECL (marker); \
+ MPFR_TMP_DECL (marker); \
\
SPEED_RESTRICT_COND (s->size >= MPFR_PREC_MIN); \
SPEED_RESTRICT_COND (s->size <= MPFR_PREC_MAX); \
- TMP_MARK (marker); \
+ MPFR_TMP_MARK (marker); \
\
size = (s->size-1)/BITS_PER_MP_LIMB+1; \
s->xp[size-1] |= MPFR_LIMB_HIGHBIT; \
@@ -104,7 +104,7 @@ int verbose;
while (--i != 0); \
t = speed_endtime (); \
\
- TMP_FREE (marker); \
+ MPFR_TMP_FREE (marker); \
return t; \
} while (0)
@@ -333,16 +333,16 @@ tune_mulder_upto (mp_size_t n)
struct speed_params s;
mp_size_t k, kbest;
double t, tbest;
- TMP_DECL (marker);
+ MPFR_TMP_DECL (marker);
if (n == 0)
return -1;
- TMP_MARK (marker);
+ MPFR_TMP_MARK (marker);
s.align_xp = s.align_yp = s.align_wp = 64;
s.size = n;
- s.xp = TMP_ALLOC (n*sizeof (mp_limb_t));
- s.yp = TMP_ALLOC (n*sizeof (mp_limb_t));
+ s.xp = MPFR_TMP_ALLOC (n*sizeof (mp_limb_t));
+ s.yp = MPFR_TMP_ALLOC (n*sizeof (mp_limb_t));
mpn_random (s.xp, n);
mpn_random (s.yp, n);
@@ -367,7 +367,7 @@ tune_mulder_upto (mp_size_t n)
mulhigh_ktab[n] = kbest;
- TMP_FREE (marker);
+ MPFR_TMP_FREE (marker);
return kbest;
}