diff options
author | tege <tege@gmplib.org> | 1996-05-26 21:42:29 +0200 |
---|---|---|
committer | tege <tege@gmplib.org> | 1996-05-26 21:42:29 +0200 |
commit | 5dbb236ecf5e8f68ebb18babe037b6d48ddc7076 (patch) | |
tree | 2b49b9a9c77564b741893f99631e1411ccdb5c39 /mpf/get_d.c | |
parent | cb84362c95922a8adc539d2650ef385da6642e11 (diff) | |
download | gmp-5dbb236ecf5e8f68ebb18babe037b6d48ddc7076.tar.gz |
scal2 => __gmp_scale2.
Diffstat (limited to 'mpf/get_d.c')
-rw-r--r-- | mpf/get_d.c | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/mpf/get_d.c b/mpf/get_d.c index 8fa6173a9..a10b366a9 100644 --- a/mpf/get_d.c +++ b/mpf/get_d.c @@ -22,8 +22,6 @@ MA 02111-1307, USA. */ #include "gmp.h" #include "gmp-impl.h" -double scal2 (); - double #if __STDC__ mpf_get_d (mpf_srcptr src) @@ -50,7 +48,7 @@ mpf_get_d (src) for (i = 2; i <= n_limbs_to_use; i++) res = res * MP_BASE_AS_DOUBLE + qp[size - i]; - res = scal2 (res, (EXP(src) - n_limbs_to_use) * BITS_PER_MP_LIMB); + res = __gmp_scale2 (res, (EXP(src) - n_limbs_to_use) * BITS_PER_MP_LIMB); return negative ? -res : res; } |