diff options
| author | dgp <dgp@users.sourceforge.net> | 2018-02-09 18:45:02 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2018-02-09 18:45:02 (GMT) |
| commit | 19d052ff26343033629e2c6c8238111f678159ae (patch) | |
| tree | 2c684b433e0e6d5dc1e87867cfe75449a4922bd6 /generic/tclUtil.c | |
| parent | 90806d35252578f723b986809885e857c5aea380 (diff) | |
| parent | 0031252bf124749bd39e94427d50a954cb3bc762 (diff) | |
| download | tcl-19d052ff26343033629e2c6c8238111f678159ae.zip tcl-19d052ff26343033629e2c6c8238111f678159ae.tar.gz tcl-19d052ff26343033629e2c6c8238111f678159ae.tar.bz2 | |
merge 8.7
Diffstat (limited to 'generic/tclUtil.c')
| -rw-r--r-- | generic/tclUtil.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclUtil.c b/generic/tclUtil.c index 5bc658a..3e47f3f 100644 --- a/generic/tclUtil.c +++ b/generic/tclUtil.c @@ -3691,7 +3691,7 @@ GetEndOffsetFromObj( ir.wideValue = offset; Tcl_StoreIntRep(objPtr, &endOffsetType, &ir); } - *indexPtr = endValue + irPtr->wideValue; + *indexPtr = endValue + (int)irPtr->wideValue; return TCL_OK; } |