diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-05-14 19:28:34 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-05-14 19:28:34 (GMT) |
| commit | 6ce7d06a332bc7b50046ceea606946686f82ebf8 (patch) | |
| tree | add6567fb0bc2d75085f1f5035c5320be77c1d8e /generic/tclStringObj.c | |
| parent | ffda787e457c8e8b09563fbace215855ba2e847f (diff) | |
| parent | 503da2614f2490195b2bd436c44cc52f3678becd (diff) | |
| download | tcl-6ce7d06a332bc7b50046ceea606946686f82ebf8.zip tcl-6ce7d06a332bc7b50046ceea606946686f82ebf8.tar.gz tcl-6ce7d06a332bc7b50046ceea606946686f82ebf8.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index 16b0357..a18c13e 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -2166,11 +2166,11 @@ Tcl_AppendFormatToObj( } #endif } else if (useBig && big.used) { - int leftover = (big.used * DIGIT_BIT) % numBits; - mp_digit mask = (~(mp_digit)0) << (DIGIT_BIT-leftover); + int leftover = (big.used * MP_DIGIT_BIT) % numBits; + mp_digit mask = (~(mp_digit)0) << (MP_DIGIT_BIT-leftover); numDigits = 1 + - (((Tcl_WideInt) big.used * DIGIT_BIT) / numBits); + (((Tcl_WideInt) big.used * MP_DIGIT_BIT) / numBits); while ((mask & big.dp[big.used-1]) == 0) { numDigits--; mask >>= numBits; @@ -2206,9 +2206,9 @@ Tcl_AppendFormatToObj( if (useBig && big.used) { if (index < big.used && (size_t) shift < - CHAR_BIT*sizeof(Tcl_WideUInt) - DIGIT_BIT) { + CHAR_BIT*sizeof(Tcl_WideUInt) - MP_DIGIT_BIT) { bits |= ((Tcl_WideUInt) big.dp[index++]) << shift; - shift += DIGIT_BIT; + shift += MP_DIGIT_BIT; } shift -= numBits; } |