diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-07 11:52:05 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-07 11:52:05 (GMT) |
| commit | 0716c6bd83df14591bdafd41dcd46ef1e78a3a17 (patch) | |
| tree | 8779e5f50b40d6d67e31510a9b709ded706525b9 /generic/tclParse.c | |
| parent | 5e2de17d9be405ccfdc6ef6311e9b7a8bff4645b (diff) | |
| download | tcl-0716c6bd83df14591bdafd41dcd46ef1e78a3a17.zip tcl-0716c6bd83df14591bdafd41dcd46ef1e78a3a17.tar.gz tcl-0716c6bd83df14591bdafd41dcd46ef1e78a3a17.tar.bz2 | |
More int -> size_t
Diffstat (limited to 'generic/tclParse.c')
| -rw-r--r-- | generic/tclParse.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclParse.c b/generic/tclParse.c index 52c11d4..1462fd7 100644 --- a/generic/tclParse.c +++ b/generic/tclParse.c @@ -2092,7 +2092,7 @@ TclSubstTokens( * errors. */ Tcl_Token *tokenPtr, /* Pointer to first in an array of tokens to * evaluate and concatenate. */ - int count, /* Number of tokens to consider at tokenPtr. + size_t count1, /* Number of tokens to consider at tokenPtr. * Must be at least 1. */ int *tokensLeftPtr, /* If not NULL, points to memory where an * integer representing the number of tokens @@ -2123,6 +2123,7 @@ TclSubstTokens( int *clPosition = NULL; Interp *iPtr = (Interp *) interp; int inFile = iPtr->evalFlags & TCL_EVAL_FILE; + int count = count1; /* * Each pass through this loop will substitute one token, and its |