diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-09-05 20:10:27 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-09-05 20:10:27 (GMT) |
| commit | 05956b6b36e17a834210d8c5640f9b359efda7a1 (patch) | |
| tree | c7b75091fb572dbe01b788c617eab442584e3669 /tests/socket.test | |
| parent | 85699b47e75cbc847ca7d7ce9a93ac36342d4ebe (diff) | |
| parent | 1ee459aa148ae0eb14af0f2c7f190c994a03504e (diff) | |
| download | tcl-05956b6b36e17a834210d8c5640f9b359efda7a1.zip tcl-05956b6b36e17a834210d8c5640f9b359efda7a1.tar.gz tcl-05956b6b36e17a834210d8c5640f9b359efda7a1.tar.bz2 | |
Merge trunk.
"paranoia" patch for the notifier, making sure that thread local data from invalid threads are never accessed by the forked main thread.
Diffstat (limited to 'tests/socket.test')
| -rw-r--r-- | tests/socket.test | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/socket.test b/tests/socket.test index 4f90e51..8473602 100644 --- a/tests/socket.test +++ b/tests/socket.test @@ -1794,7 +1794,7 @@ test socket_$af-13.1 {Testing use of shared socket between two threads} -body { close $s thread::release $serverthread append result " " [llength [thread::names]] -} -result {hello 1} -constraints [list socket supported_$af thread] +} -result {hello 1} -constraints [list socket supported_$af thread] # ---------------------------------------------------------------------- @@ -2249,7 +2249,7 @@ test socket-14.11.0 {pending [socket -async] and nonblocking [puts], no listener unset x } -result {socket is not connected} -returnCodes 1 test socket-14.11.1 {pending [socket -async] and nonblocking [puts], no listener, flush} \ - -constraints {socket nonportable} \ + -constraints {socket nonPortable} \ -body { set sock [socket -async localhost [randport]] fconfigure $sock -blocking 0 @@ -2281,10 +2281,10 @@ test socket-14.13 {testing writable event when quick failure} \ -constraints {socket win supported_inet} \ -body { # Test for bug 336441ed59 where a quick background fail was ignored - + # Test only for windows as socket -async 255.255.255.255 fails # directly on unix - + # The following connect should fail very quickly set a1 [after 2000 {set x timeout}] set s [socket -async 255.255.255.255 43434] @@ -2299,7 +2299,7 @@ test socket-14.13 {testing writable event when quick failure} \ test socket-14.14 {testing fileevent readable on failed async socket connect} \ -constraints {socket} -body { # Test for bug 581937ab1e - + set a1 [after 5000 {set x timeout}] # This connect should fail set s [socket -async localhost [randport]] |