diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-11-08 09:01:43 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-11-08 09:01:43 (GMT) |
| commit | 5de9b738d3fc73ba62f781f55ba8891ccec9764a (patch) | |
| tree | 2dfe8e46cde63cf66758cd794762d3c26ea99ce3 /generic/tclBinary.c | |
| parent | 2325ddede0d49a1700d83457e8e36da87e548ccf (diff) | |
| parent | 65946d3f86dd49b65b128b71d4b2c4b4a020a277 (diff) | |
| download | tcl-5de9b738d3fc73ba62f781f55ba8891ccec9764a.zip tcl-5de9b738d3fc73ba62f781f55ba8891ccec9764a.tar.gz tcl-5de9b738d3fc73ba62f781f55ba8891ccec9764a.tar.bz2 | |
Merge 8.6.
Add support for libtommath's mp_set_ll() function, since that's the replacement for the deprecated TclBNInitBignumFromWideInt() function.
Diffstat (limited to 'generic/tclBinary.c')
| -rw-r--r-- | generic/tclBinary.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/generic/tclBinary.c b/generic/tclBinary.c index e28535e..3f263bc 100644 --- a/generic/tclBinary.c +++ b/generic/tclBinary.c @@ -2349,8 +2349,10 @@ ScanNumber( Tcl_Obj *bigObj = NULL; mp_int big; - TclBNInitBignumFromWideUInt(&big, uwvalue); - bigObj = Tcl_NewBignumObj(&big); + if (mp_init(&big) == MP_OKAY) { + mp_set_ull(&big, uwvalue); + bigObj = Tcl_NewBignumObj(&big); + } return bigObj; } return Tcl_NewWideIntObj((Tcl_WideInt) uwvalue); |