diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-05-14 19:13:01 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-05-14 19:13:01 (GMT) |
| commit | de4f571baa7f9d53f48031e230c4d8f7c69cf1f5 (patch) | |
| tree | 5a70c38238478aba4893b1207c3d5fe70bb83937 /generic/tclStringObj.c | |
| parent | 9ca29b09ae01c2710010821b09fff5f613c7c26f (diff) | |
| parent | 8094d33e4331c3f61d015b91018908fa6fb60b96 (diff) | |
| download | tcl-de4f571baa7f9d53f48031e230c4d8f7c69cf1f5.zip tcl-de4f571baa7f9d53f48031e230c4d8f7c69cf1f5.tar.gz tcl-de4f571baa7f9d53f48031e230c4d8f7c69cf1f5.tar.bz2 | |
Merge 8.5
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 46bd1c1..222e529 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -2218,11 +2218,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; @@ -2258,9 +2258,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; } |