diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-06-23 12:57:09 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-06-23 12:57:09 (GMT) |
| commit | a96dae7f0f22970833799aa44043355ece05f3d4 (patch) | |
| tree | beb0ad5399f3c72ce834794f640c6ae1c20d7e77 | |
| parent | 0f72e7de19985f400051e013c40f53c98d2af9d6 (diff) | |
| download | tcl-a96dae7f0f22970833799aa44043355ece05f3d4.zip tcl-a96dae7f0f22970833799aa44043355ece05f3d4.tar.gz tcl-a96dae7f0f22970833799aa44043355ece05f3d4.tar.bz2 | |
Slightly better integer overflow handling in Tcl_ListObjReplace()
| -rw-r--r-- | generic/tclListObj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclListObj.c b/generic/tclListObj.c index 9bc4e47..88a332f 100644 --- a/generic/tclListObj.c +++ b/generic/tclListObj.c @@ -889,7 +889,7 @@ Tcl_ListObjReplace( } if (count < 0) { count = 0; - } else if (first > INT_MAX - count /* Handle integer overflow */ + } else if (count > LIST_MAX /* Handle integer overflow */ || numElems < first+count) { count = numElems - first; |