diff options
| -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 0c753cf..a7f723d 100644 --- a/generic/tclListObj.c +++ b/generic/tclListObj.c @@ -1022,7 +1022,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; |