summaryrefslogtreecommitdiffstats
path: root/generic/tclCompile.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-03-08 11:38:58 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-03-08 11:38:58 (GMT)
commit9c52d351f19a451f9d7fff451624b195959a558d (patch)
tree243ef012d5f26c9731c3513281ab849864ffbe81 /generic/tclCompile.c
parent559954ccb37cf5d1bde6ed4bb37cde477b76a154 (diff)
downloadtcl-9c52d351f19a451f9d7fff451624b195959a558d.zip
tcl-9c52d351f19a451f9d7fff451624b195959a558d.tar.gz
tcl-9c52d351f19a451f9d7fff451624b195959a558d.tar.bz2
More size_t
Diffstat (limited to 'generic/tclCompile.c')
-rw-r--r--generic/tclCompile.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c
index 9166ec4..e86a363 100644
--- a/generic/tclCompile.c
+++ b/generic/tclCompile.c
@@ -3164,7 +3164,7 @@ EnterCmdStartData(
{
CmdLocation *cmdLocPtr;
- if ((cmdIndex < 0) || (cmdIndex >= envPtr->numCommands)) {
+ if ((size_t)cmdIndex >= envPtr->numCommands) {
Tcl_Panic("EnterCmdStartData: bad command index %d", cmdIndex);
}
@@ -3243,7 +3243,7 @@ EnterCmdExtentData(
{
CmdLocation *cmdLocPtr;
- if ((cmdIndex < 0) || (cmdIndex >= envPtr->numCommands)) {
+ if ((size_t)cmdIndex >= envPtr->numCommands) {
Tcl_Panic("EnterCmdExtentData: bad command index %d", cmdIndex);
}
@@ -4028,7 +4028,7 @@ TclFixupForwardJump(
*/
firstCmd = jumpFixupPtr->cmdIndex;
- lastCmd = envPtr->numCommands - 1;
+ lastCmd = (int)envPtr->numCommands - 1;
if (firstCmd < lastCmd) {
for (k = firstCmd; k <= lastCmd; k++) {
envPtr->cmdMapPtr[k].codeOffset += 3;