summaryrefslogtreecommitdiffstats
path: root/generic/tclStrToD.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-06-15 22:31:51 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-06-15 22:31:51 (GMT)
commit96f1d4ec345c2fa7ab4ff6c4840c4dab2392cc53 (patch)
treeb52d906aa3c2c07fb82d13b3abfc8c1c7cbcf655 /generic/tclStrToD.c
parente69d76af16939ec4327b1793f8a2cb358a141972 (diff)
parentc1ee80eccf07579e1df09f808369df85013241db (diff)
downloadtcl-96f1d4ec345c2fa7ab4ff6c4840c4dab2392cc53.zip
tcl-96f1d4ec345c2fa7ab4ff6c4840c4dab2392cc53.tar.gz
tcl-96f1d4ec345c2fa7ab4ff6c4840c4dab2392cc53.tar.bz2
Merge 8.5
Diffstat (limited to 'generic/tclStrToD.c')
-rw-r--r--generic/tclStrToD.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index 4826d1c..94e7600 100644
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -3294,7 +3294,7 @@ ShorteningBignumConversionPowD(
*/
TclBNInitBignumFromWideUInt(&b, bw);
- mp_init_set_int(&mminus, 1);
+ mp_init_set(&mminus, 1);
MulPow5(&b, b5, &b);
mp_mul_2d(&b, b2, &b);
@@ -3690,7 +3690,7 @@ ShorteningBignumConversion(
TclBNInitBignumFromWideUInt(&b, bw);
mp_mul_2d(&b, b2, &b);
- mp_init_set_int(&S, 1);
+ mp_init_set(&S, 1);
MulPow5(&S, s5, &S); mp_mul_2d(&S, s2, &S);
/*
@@ -3708,7 +3708,7 @@ ShorteningBignumConversion(
* mminus = 2**m2minus * 5**m5
*/
- mp_init_set_int(&mminus, minit);
+ mp_init_set(&mminus, minit);
mp_mul_2d(&mminus, m2minus, &mminus);
if (m2plus > m2minus) {
mp_init_copy(&mplus, &mminus);
@@ -3903,7 +3903,7 @@ StrictBignumConversion(
mp_init_multi(&temp, &dig, NULL);
TclBNInitBignumFromWideUInt(&b, bw);
mp_mul_2d(&b, b2, &b);
- mp_init_set_int(&S, 1);
+ mp_init_set(&S, 1);
MulPow5(&S, s5, &S); mp_mul_2d(&S, s2, &S);
/*