diff options
author | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2014-11-03 05:48:02 +0000 |
---|---|---|
committer | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2014-11-03 05:48:02 +0000 |
commit | e55f6c6280976ecd62d9284145ee24900e3c8b3e (patch) | |
tree | 3cec3894643ef5a7bbc2138b6f54950851849d88 /src/get_str.c | |
parent | bdf190b1ab91635e8748c65e018b5feb92cdbe1d (diff) | |
download | mpfr-e55f6c6280976ecd62d9284145ee24900e3c8b3e.tar.gz |
[src] Applied patch by Patrick PĂ©lissier to allocate some constant-size
MPFR numbers on the stack instead of using mpfr_init2, and replace some
MPFR_ASSERTN by MPFR_ASSERTD.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@9229 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'src/get_str.c')
-rw-r--r-- | src/get_str.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/get_str.c b/src/get_str.c index cde07e397..eeaf97a79 100644 --- a/src/get_str.c +++ b/src/get_str.c @@ -2219,13 +2219,13 @@ mpfr_ceil_mul (mpfr_exp_t e, int beta, int i) mpfr_srcptr p; mpfr_t t; mpfr_exp_t r; + mp_limb_t tmpmant[(sizeof (mpfr_exp_t) - 1 ) / sizeof (mp_limb_t) + 1]; p = &__gmpfr_l2b[beta-2][i]; - mpfr_init2 (t, sizeof (mpfr_exp_t) * CHAR_BIT); + MPFR_TMP_INIT1(tmpmant, t, sizeof (mpfr_exp_t) * CHAR_BIT); mpfr_set_exp_t (t, e, MPFR_RNDU); mpfr_mul (t, t, p, MPFR_RNDU); r = mpfr_get_exp_t (t, MPFR_RNDU); - mpfr_clear (t); return r; } |