diff options
author | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2014-01-16 11:01:49 +0000 |
---|---|---|
committer | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2014-01-16 11:01:49 +0000 |
commit | 25413bfbaf22bd9021e97fd413ee44cb307a0b6f (patch) | |
tree | 02a7e4e9ce49e73a8f348b7d2a4033ce58195ea3 | |
parent | dfbb5f7f65b64ed12f38cd51b3f28da6f25cfff8 (diff) | |
download | mpfr-25413bfbaf22bd9021e97fd413ee44cb307a0b6f.tar.gz |
replaced function _mpz_realloc by preferred one mpz_realloc2
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@8749 280ebfd0-de03-0410-8827-d642c229c3f4
-rw-r--r-- | src/extract.c | 2 | ||||
-rw-r--r-- | src/get_z_exp.c | 3 | ||||
-rw-r--r-- | src/mpfr-gmp.h | 1 |
3 files changed, 2 insertions, 4 deletions
diff --git a/src/extract.c b/src/extract.c index 5f5d96339..13f8740dc 100644 --- a/src/extract.c +++ b/src/extract.c @@ -40,7 +40,7 @@ mpfr_extract (mpz_ptr y, mpfr_srcptr p, unsigned int i) /* as 0 <= |p| < 1, we don't have to care with infinities, NaN, ... */ MPFR_ASSERTD (!MPFR_IS_SINGULAR (p)); - _mpz_realloc (y, two_i_2); + mpz_realloc2 (y, two_i_2 * GMP_NUMB_BITS); if ((mpfr_uexp_t) size_p < two_i) { MPN_ZERO (PTR(y), two_i_2); diff --git a/src/get_z_exp.c b/src/get_z_exp.c index a949db60b..f42f17c12 100644 --- a/src/get_z_exp.c +++ b/src/get_z_exp.c @@ -56,8 +56,7 @@ mpfr_get_z_2exp (mpz_ptr z, mpfr_srcptr f) fn = MPFR_LIMB_SIZE(f); /* check whether allocated space for z is enough */ - if (MPFR_UNLIKELY (ALLOC (z) < fn)) - MPZ_REALLOC (z, fn); + mpz_realloc2 (z, fn * GMP_NUMB_BITS); MPFR_UNSIGNED_MINUS_MODULO (sh, MPFR_PREC (f)); if (MPFR_LIKELY (sh)) diff --git a/src/mpfr-gmp.h b/src/mpfr-gmp.h index 419d87d31..946605f6e 100644 --- a/src/mpfr-gmp.h +++ b/src/mpfr-gmp.h @@ -163,7 +163,6 @@ __MPFR_DECLSPEC void mpfr_assert_fail _MPFR_PROTO((const char *, int, #define EXP(x) ((x)->_mp_exp) #define PREC(x) ((x)->_mp_prec) #define ALLOC(x) ((x)->_mp_alloc) -#define MPZ_REALLOC(z,n) ((n) > ALLOC(z) ? _mpz_realloc(z,n) : PTR(z)) /* Non IEEE float supports -- needs to detect them with proper configure */ #undef XDEBUG |