diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-12-20 01:01:48 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-12-20 01:01:48 (GMT) |
| commit | 28146e3fee39124075fa8c1776da56e6ebed616c (patch) | |
| tree | dc18bcd49a4f4484358af3c58262a4eb40112c60 | |
| parent | b737e2f093fc9f5067e8498318550436de771cc6 (diff) | |
| parent | ead6c0d0543e7a3ccb5a45d79554f7852d70a1df (diff) | |
| download | tcl-28146e3fee39124075fa8c1776da56e6ebed616c.zip tcl-28146e3fee39124075fa8c1776da56e6ebed616c.tar.gz tcl-28146e3fee39124075fa8c1776da56e6ebed616c.tar.bz2 | |
Merge 8.7
| -rw-r--r-- | generic/tclExecute.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index f667054..2c5e697 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -5811,7 +5811,7 @@ TEBCresume( if (((size_t) shift < CHAR_BIT*sizeof(long)) && !((w1>0 ? w1 : ~w1) & -(1UL<<(CHAR_BIT*sizeof(long) - 1 - shift)))) { - wResult = (unsigned long)w1 << shift; + wResult = (Tcl_WideUInt)w1 << shift; goto wideResultOfArithmetic; } } |