diff options
author | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2014-02-12 19:01:28 +0000 |
---|---|---|
committer | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2014-02-12 19:01:28 +0000 |
commit | ac8a62f04e454cd3af1f326acba66a7cb6dd6954 (patch) | |
tree | 023d74c15bdd2cc6d4ad25ea01526514ec0d02aa /src/gamma.c | |
parent | e3b16a1b54e2a3518f3175e767cfe1772d7eb323 (diff) | |
download | mpfr-ac8a62f04e454cd3af1f326acba66a7cb6dd6954.tar.gz |
forgot to restore the exponents in last commit
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@8959 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'src/gamma.c')
-rw-r--r-- | src/gamma.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/gamma.c b/src/gamma.c index 54bd761d8..673a3a65b 100644 --- a/src/gamma.c +++ b/src/gamma.c @@ -260,7 +260,10 @@ mpfr_gamma (mpfr_ptr gamma, mpfr_srcptr x, mpfr_rnd_t rnd_mode) /* quick test for the default exponent range */ if (mpfr_get_emax () >= 1073741823UL && MPFR_GET_EXP(x) <= 25) - return mpfr_gamma_aux (gamma, x, rnd_mode); + { + MPFR_SAVE_EXPO_FREE (expo); + return mpfr_gamma_aux (gamma, x, rnd_mode); + } /* 1/e rounded down to 53 bits */ #define EXPM1_STR "0.010111100010110101011000110110001011001110111100111" |