diff options
author | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-05-18 15:57:10 +0000 |
---|---|---|
committer | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-05-18 15:57:10 +0000 |
commit | b88c50d268e5e11da7c3363d421246dbb14bc180 (patch) | |
tree | 205a24fbfc48e8d135ec15b617d85335a673ad58 /tuneup.c | |
parent | e1bd5aef35c4619b29cf017d8128525d23bbdb56 (diff) | |
download | mpfr-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.c | 22 |
1 files changed, 11 insertions, 11 deletions
@@ -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; } |