diff options
| author | enge <enge@211d60ee-9f03-0410-a15a-8952a2c7a4e4> | 2010-06-11 16:05:10 +0000 |
|---|---|---|
| committer | enge <enge@211d60ee-9f03-0410-a15a-8952a2c7a4e4> | 2010-06-11 16:05:10 +0000 |
| commit | c8bac977892250a6ef84841de250ad3b4da801be (patch) | |
| tree | 9a18d849e180ea0552fc87efd21d7140eee74d7e /src/pow_ui.c | |
| parent | e96430e22b53d031f7570e779d115442e418f77e (diff) | |
| download | mpc-c8bac977892250a6ef84841de250ad3b4da801be.tar.gz | |
replaced mp_exp_t by mpfr_exp_t, introduced in mpfr-3
if not existant, mpfr_exp_t is defined in mpc.h
git-svn-id: svn://scm.gforge.inria.fr/svn/mpc/trunk@777 211d60ee-9f03-0410-a15a-8952a2c7a4e4
Diffstat (limited to 'src/pow_ui.c')
| -rw-r--r-- | src/pow_ui.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/pow_ui.c b/src/pow_ui.c index 5b83438..1dd1fa0 100644 --- a/src/pow_ui.c +++ b/src/pow_ui.c @@ -51,11 +51,11 @@ mpc_pow_ui (mpc_ptr z, mpc_srcptr x, unsigned long y, mpc_rnd_t rnd) /* let mpc_pow deal with special cases */ return mpc_pow_ui_naive (z, x, y, rnd); else { - mp_exp_t exp_r = mpfr_get_exp (MPC_RE (x)), - exp_i = mpfr_get_exp (MPC_IM (x)); - if ( MPC_MAX (exp_r, exp_i) > mpfr_get_emax () / (mp_exp_t) y + mpfr_exp_t exp_r = mpfr_get_exp (MPC_RE (x)), + exp_i = mpfr_get_exp (MPC_IM (x)); + if ( MPC_MAX (exp_r, exp_i) > mpfr_get_emax () / (mpfr_exp_t) y /* heuristic for overflow */ - || MPC_MAX (-exp_r, -exp_i) > (-mpfr_get_emin ()) / (mp_exp_t) y + || MPC_MAX (-exp_r, -exp_i) > (-mpfr_get_emin ()) / (mpfr_exp_t) y /* heuristic for underflow */ ) return mpc_pow_ui_naive (z, x, y, rnd); @@ -111,7 +111,7 @@ mpc_pow_ui (mpc_ptr z, mpc_srcptr x, unsigned long y, mpc_rnd_t rnd) done = 1; } else { - mp_exp_t diff; + mpfr_exp_t diff; mpfr_prec_t er, ei; diff = mpfr_get_exp (MPC_RE(t)) - mpfr_get_exp (MPC_IM(t)); /* the factor on the real part is 2+2^(-diff+2) <= 4 for diff >= 1 |