diff options
Diffstat (limited to 'generic/tclPipe.c')
| -rw-r--r-- | generic/tclPipe.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclPipe.c b/generic/tclPipe.c index f94fe5c..3494fdd 100644 --- a/generic/tclPipe.c +++ b/generic/tclPipe.c @@ -336,7 +336,7 @@ TclCleanupChildren( Tcl_Seek(errorChan, (Tcl_WideInt)0, SEEK_SET); objPtr = Tcl_NewObj(); count = Tcl_ReadChars(errorChan, objPtr, -1, 0); - if (count < 0) { + if (count == -1) { result = TCL_ERROR; Tcl_DecrRefCount(objPtr); Tcl_ResetResult(interp); |