summaryrefslogtreecommitdiffstats
path: root/generic/tclIORChan.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2015-10-23 14:57:56 (GMT)
committerdgp <dgp@users.sourceforge.net>2015-10-23 14:57:56 (GMT)
commit2117a3bcf0ee00ee1c7036744732be970cfd6181 (patch)
treee633e96e73f5b5fd2227000e74c261e6da18cca7 /generic/tclIORChan.c
parent4e08431e8790a66cea86d33c8c770626396509c0 (diff)
downloadtcl-2117a3bcf0ee00ee1c7036744732be970cfd6181.zip
tcl-2117a3bcf0ee00ee1c7036744732be970cfd6181.tar.gz
tcl-2117a3bcf0ee00ee1c7036744732be970cfd6181.tar.bz2
Backout of failed attempt to fix [32ae34e63a] got checked into wrong branch.
Diffstat (limited to 'generic/tclIORChan.c')
-rw-r--r--generic/tclIORChan.c8
1 files changed, 8 insertions, 0 deletions
diff --git a/generic/tclIORChan.c b/generic/tclIORChan.c
index 2e5fa45..bbb5b88 100644
--- a/generic/tclIORChan.c
+++ b/generic/tclIORChan.c
@@ -1508,6 +1508,14 @@ ReflectWatch(
mask &= rcPtr->mode;
+ if (mask == rcPtr->interest) {
+ /*
+ * Same old, same old, why should we do something?
+ */
+
+ return;
+ }
+
rcPtr->interest = mask;
/*