summaryrefslogtreecommitdiff
path: root/src/gamma.c
diff options
context:
space:
mode:
authorzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2014-02-12 19:01:28 +0000
committerzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2014-02-12 19:01:28 +0000
commitac8a62f04e454cd3af1f326acba66a7cb6dd6954 (patch)
tree023d74c15bdd2cc6d4ad25ea01526514ec0d02aa /src/gamma.c
parente3b16a1b54e2a3518f3175e767cfe1772d7eb323 (diff)
downloadmpfr-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.c5
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"