diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-18 22:11:19 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-18 22:11:19 (GMT) |
| commit | 213119c371559613a16fb7d3f59cb3260f548b22 (patch) | |
| tree | c15c27e7c63f95941d841de7102eb928287d00b2 /generic/tclCompile.c | |
| parent | b5d450df9e1ab548134a2cde35d9a7dba69122b1 (diff) | |
| download | tcl-213119c371559613a16fb7d3f59cb3260f548b22.zip tcl-213119c371559613a16fb7d3f59cb3260f548b22.tar.gz tcl-213119c371559613a16fb7d3f59cb3260f548b22.tar.bz2 | |
More progress
Diffstat (limited to 'generic/tclCompile.c')
| -rw-r--r-- | generic/tclCompile.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index a0004dc..bcd8026 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -2215,7 +2215,7 @@ TclCompileScript( numBytes -= next - p; p = next; - if ((int)parsePtr->numWords == 0) { + if (parsePtr->numWords == 0) { /* * The "command" parsed has no words. In this case we can skip * the rest of the loop body. With no words, clearly @@ -2991,7 +2991,7 @@ TclFindCompiledLocal( { CompiledLocal *localPtr; int localVar = -1; - int i; + size_t i; Proc *procPtr; /* @@ -3029,7 +3029,7 @@ TclFindCompiledLocal( } if (name != NULL) { - int localCt = procPtr->numCompiledLocals; + size_t localCt = procPtr->numCompiledLocals; localPtr = procPtr->firstLocalPtr; for (i = 0; i < localCt; i++) { |