diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-29 13:17:10 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-29 13:17:10 (GMT) |
commit | b0b75a50838fb17c643dad2d633c7240d207db96 (patch) | |
tree | ab995338e4b7059fabdc9b295e5948e263bd0651 /generic/tclCmdIL.c | |
parent | 432fbdc37562b215a1955ebc8c5af4aadd24315a (diff) | |
download | tcl-b0b75a50838fb17c643dad2d633c7240d207db96.zip tcl-b0b75a50838fb17c643dad2d633c7240d207db96.tar.gz tcl-b0b75a50838fb17c643dad2d633c7240d207db96.tar.bz2 |
More progress
Diffstat (limited to 'generic/tclCmdIL.c')
-rw-r--r-- | generic/tclCmdIL.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c index 004cdb2..e73bce4 100644 --- a/generic/tclCmdIL.c +++ b/generic/tclCmdIL.c @@ -3694,7 +3694,7 @@ Tcl_LsearchObjCmd( if (allMatches) { listPtr = Tcl_NewListObj(0, NULL); } - for (i = start; i < (size_t)listc; i += groupSize) { + for (i = start; i < listc; i += groupSize) { match = 0; if (sortInfo.indexc != 0) { itemPtr = SelectObjFromSublist(listv[i+groupOffset], &sortInfo); @@ -4188,7 +4188,7 @@ Tcl_LsortObjCmd( allocatedIndexVector = 1; /* Cannot use indexc field, as it * might be decreased by 1 later. */ } - for (j=0 ; j<(size_t)sortInfo.indexc ; j++) { + for (j=0 ; j<sortInfo.indexc ; j++) { /* Prescreened values, no errors or out of range possible */ TclIndexEncode(NULL, indexv[j], TCL_INDEX_NONE, TCL_INDEX_NONE, &sortInfo.indexv[j]); |