summaryrefslogtreecommitdiffstats
path: root/unix/tclUnixSock.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2014-06-02 20:03:14 (GMT)
committerdgp <dgp@users.sourceforge.net>2014-06-02 20:03:14 (GMT)
commitabb4df1befac97bab990b6aefbbb6c21d330eb08 (patch)
treea7121fb462da5136135109fa4c8d034d27cd05fd /unix/tclUnixSock.c
parentc564e71550c301b91656eb54602bb8c1ece62f01 (diff)
downloadtcl-abb4df1befac97bab990b6aefbbb6c21d330eb08.zip
tcl-abb4df1befac97bab990b6aefbbb6c21d330eb08.tar.gz
tcl-abb4df1befac97bab990b6aefbbb6c21d330eb08.tar.bz2
These edits make the tests socket-14.11.[01] stop hanging, but also introduce
a whole raft of test failures. WIP.
Diffstat (limited to 'unix/tclUnixSock.c')
-rw-r--r--unix/tclUnixSock.c8
1 files changed, 3 insertions, 5 deletions
diff --git a/unix/tclUnixSock.c b/unix/tclUnixSock.c
index 08a14d3..47d0681 100644
--- a/unix/tclUnixSock.c
+++ b/unix/tclUnixSock.c
@@ -1160,11 +1160,9 @@ out:
* the event mechanism one roundtrip through select().
*/
- /* Note: disabling this for now as it causes spurious event triggering
- * under Linux (see test socket-14.15). */
-#if 0
- Tcl_NotifyChannel(statePtr->channel, TCL_WRITABLE);
-#endif
+ if (statePtr->cachedBlocking == TCL_MODE_NONBLOCKING) {
+ Tcl_NotifyChannel(statePtr->channel, TCL_WRITABLE);
+ }
}
if (error != 0) {
/*