diff options
author | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2004-01-15 12:09:25 +0000 |
---|---|---|
committer | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2004-01-15 12:09:25 +0000 |
commit | c276f575ff672940ef47253dea49f6641890ec45 (patch) | |
tree | 4151f9d82f164be4b8f611e0b8943117b37dcb9a /set_str.c | |
parent | 2745776c6fba28507dfb0985437ebd1c94477b0b (diff) | |
download | mpfr-c276f575ff672940ef47253dea49f6641890ec45.tar.gz |
mpn_exp -> mpfr_mpn_exp
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@2624 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'set_str.c')
-rw-r--r-- | set_str.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -264,7 +264,7 @@ mpfr_set_str (mpfr_t x, const char *str, int base, mp_rnd_t rnd) /* (z, exp_z) = base^(exp_s-pr), then result = y*z */ /* z is allocated at y - n */ z = y - n; - err = mpn_exp (z, &exp_z, base, exp_s - (mp_exp_t) pr, n); + err = mpfr_mpn_exp (z, &exp_z, base, exp_s - (mp_exp_t) pr, n); exact = (exact && (err == -1)); /* multiply (y = 0.mant_s[0]...mant_s[pr-1])_base by base^(exp_s-g) */ @@ -299,7 +299,7 @@ mpfr_set_str (mpfr_t x, const char *str, int base, mp_rnd_t rnd) /* (z, exp_z) = base^(exp_s-pr) */ z = TMP_ALLOC (n * sizeof (mp_limb_t)); - err = mpn_exp (z, &exp_z, base, pr - exp_s, n); + err = mpfr_mpn_exp (z, &exp_z, base, pr - exp_s, n); exact = (exact && (err == -1)); if (err == -1) |