diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-05-17 14:22:50 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-05-17 14:22:50 (GMT) |
| commit | f51c5464dcfb28580b92ba3f16a3d22ec36a8005 (patch) | |
| tree | 12a330bf0c46f607123ad46d457b54910cde1174 /generic/tclStringObj.c | |
| parent | 3a37a573a27026dabb2ec4f9dc001787542914d2 (diff) | |
| parent | a68f7032b3a1880b9edd85bcf98d5a38e7705067 (diff) | |
| download | tcl-f51c5464dcfb28580b92ba3f16a3d22ec36a8005.zip tcl-f51c5464dcfb28580b92ba3f16a3d22ec36a8005.tar.gz tcl-f51c5464dcfb28580b92ba3f16a3d22ec36a8005.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 587334f..d5edaf3 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -2270,11 +2270,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; @@ -2310,9 +2310,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; } |