diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-23 14:04:36 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-23 14:04:36 (GMT) |
| commit | ac7d65a8345455832dbb0ba384437e2953e23bdd (patch) | |
| tree | 767ef825ec8f8e1b0a69e379a6226c1926eacc88 /generic/tclPipe.c | |
| parent | 6d23f73e8aba5d1c6ed987c139b2b719be84a254 (diff) | |
| download | tcl-ac7d65a8345455832dbb0ba384437e2953e23bdd.zip tcl-ac7d65a8345455832dbb0ba384437e2953e23bdd.tar.gz tcl-ac7d65a8345455832dbb0ba384437e2953e23bdd.tar.bz2 | |
Some more int -> size_t in internal API
Diffstat (limited to 'generic/tclPipe.c')
| -rw-r--r-- | generic/tclPipe.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclPipe.c b/generic/tclPipe.c index b9c37e0..5a71446 100644 --- a/generic/tclPipe.c +++ b/generic/tclPipe.c @@ -269,16 +269,16 @@ Tcl_ReapDetachedProcs(void) int TclCleanupChildren( Tcl_Interp *interp, /* Used for error messages. */ - int numPids, /* Number of entries in pidPtr array. */ + size_t numPids, /* Number of entries in pidPtr array. */ Tcl_Pid *pidPtr, /* Array of process ids of children. */ Tcl_Channel errorChan) /* Channel for file containing stderr output * from pipeline. NULL means there isn't any * stderr output. */ { int result = TCL_OK; - int i, abnormalExit, anyErrorInfo; + int code, abnormalExit, anyErrorInfo; TclProcessWaitStatus waitStatus; - int code; + size_t i; Tcl_Obj *msg, *error; abnormalExit = 0; |