diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-06-14 21:48:00 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-06-14 21:48:00 (GMT) |
| commit | 15e17d01d57f28aa3ccb9adcc344937c4b5a34e0 (patch) | |
| tree | 80050a4af1fcd9e60dbc7cf57462a7ed505974c9 /generic/tclStrToD.c | |
| parent | e69d76af16939ec4327b1793f8a2cb358a141972 (diff) | |
| parent | db7fa65dce753b80d5f2a87799aabd481e9144a2 (diff) | |
| download | tcl-15e17d01d57f28aa3ccb9adcc344937c4b5a34e0.zip tcl-15e17d01d57f28aa3ccb9adcc344937c4b5a34e0.tar.gz tcl-15e17d01d57f28aa3ccb9adcc344937c4b5a34e0.tar.bz2 | |
Latest libtommath's "develop" branch adapted for Tcl 8.6. And Tcl 8.6 adapted for changes in libtommath
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); /* |