summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2017-10-23 12:09:48 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2017-10-23 12:09:48 (GMT)
commitcdb25d894650feb93162033ae30f0e158b6efb1e (patch)
tree1c574e2bd02f623e6e7c9f9b95aa0452951fc5f0
parentdf974e71f99feff44f12a02e66281948465d32ec (diff)
downloadtcl-cdb25d894650feb93162033ae30f0e158b6efb1e.zip
tcl-cdb25d894650feb93162033ae30f0e158b6efb1e.tar.gz
tcl-cdb25d894650feb93162033ae30f0e158b6efb1e.tar.bz2
Fix [b58e6897034fc5292c9d36ba8099d9a835c98172|b58e689703]: Return value of 'Tcl_Flush'
-rw-r--r--generic/tclIO.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c
index 64501fd..e74624f 100644
--- a/generic/tclIO.c
+++ b/generic/tclIO.c
@@ -6660,7 +6660,7 @@ Tcl_Flush(
chanPtr = statePtr->topChanPtr;
if (CheckChannelErrors(statePtr, TCL_WRITABLE) != 0) {
- return -1;
+ return TCL_ERROR;
}
result = FlushChannel(NULL, chanPtr, 0);