diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-06-15 22:31:51 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-06-15 22:31:51 (GMT) |
commit | 96f1d4ec345c2fa7ab4ff6c4840c4dab2392cc53 (patch) | |
tree | b52d906aa3c2c07fb82d13b3abfc8c1c7cbcf655 /generic/tclStrToD.c | |
parent | e69d76af16939ec4327b1793f8a2cb358a141972 (diff) | |
parent | c1ee80eccf07579e1df09f808369df85013241db (diff) | |
download | tcl-96f1d4ec345c2fa7ab4ff6c4840c4dab2392cc53.zip tcl-96f1d4ec345c2fa7ab4ff6c4840c4dab2392cc53.tar.gz tcl-96f1d4ec345c2fa7ab4ff6c4840c4dab2392cc53.tar.bz2 |
Merge 8.5
Diffstat (limited to 'generic/tclStrToD.c')
-rw-r--r-- | generic/tclStrToD.c | 8 |
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); /* |