diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-01-08 13:16:49 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-01-08 13:16:49 (GMT) |
| commit | 0c195b760ab6ef40333dd9543eba6cfce332af39 (patch) | |
| tree | 8767d8c9972883e5ed6daba2800860cb5125df83 /generic/tclStringObj.c | |
| parent | 49a7184962b241204447d10cb9546f514237c344 (diff) | |
| parent | 0df818c01fec80789e1b6b0e5182d5a321bcd171 (diff) | |
| download | tcl-0c195b760ab6ef40333dd9543eba6cfce332af39.zip tcl-0c195b760ab6ef40333dd9543eba6cfce332af39.tar.gz tcl-0c195b760ab6ef40333dd9543eba6cfce332af39.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index eed49b1..5512bc5 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -2270,7 +2270,7 @@ Tcl_AppendFormatToObj( uw /= base; } #endif - } else if (useBig && big.used) { + } else if (useBig && !mp_iszero(&big)) { int leftover = (big.used * MP_DIGIT_BIT) % numBits; mp_digit mask = (~(mp_digit)0) << (MP_DIGIT_BIT-leftover); @@ -2309,7 +2309,7 @@ Tcl_AppendFormatToObj( while (numDigits--) { int digitOffset; - if (useBig && big.used) { + if (useBig && !mp_iszero(&big)) { if (index < big.used && (size_t) shift < CHAR_BIT*sizeof(Tcl_WideUInt) - MP_DIGIT_BIT) { bits |= ((Tcl_WideUInt) big.dp[index++]) << shift; |