summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2014-05-28 16:54:02 (GMT)
committerdgp <dgp@users.sourceforge.net>2014-05-28 16:54:02 (GMT)
commit1c2468956cac48003a15f5984176963d5135d340 (patch)
tree2fa7e3ae46d7ac1154c7668e222a150c1f71ad62 /tests
parent00ef775fc158959acc2c14c5ff3568e1f86fe538 (diff)
downloadtcl-1c2468956cac48003a15f5984176963d5135d340.zip
tcl-1c2468956cac48003a15f5984176963d5135d340.tar.gz
tcl-1c2468956cac48003a15f5984176963d5135d340.tar.bz2
Increase size of test io-29.34 so that it more portably tests the case where
the OS networking machinery gets backed up and blocks. Added several TODO comments on potential simplifications.
Diffstat (limited to 'tests')
-rw-r--r--tests/io.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/io.test b/tests/io.test
index c7da8e6..f1248b9 100644
--- a/tests/io.test
+++ b/tests/io.test
@@ -2786,7 +2786,7 @@ test io-29.34 {Tcl_Close, async flush on close, using sockets} {socket tempNotMa
variable x running
set l abcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyz
proc writelots {s l} {
- for {set i 0} {$i < 2000} {incr i} {
+ for {set i 0} {$i < 9000} {incr i} {
puts $s $l
}
}
@@ -2817,7 +2817,7 @@ test io-29.34 {Tcl_Close, async flush on close, using sockets} {socket tempNotMa
close $ss
vwait [namespace which -variable x]
set c
-} 2000
+} 9000
test io-29.35 {Tcl_Close vs fileevent vs multiple interpreters} {socket tempNotMac fileevent} {
# On Mac, this test screws up sockets such that subsequent tests using port 2828
# either cause errors or panic().