summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2020-11-17 12:37:31 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2020-11-17 12:37:31 (GMT)
commit12858c0d2021df00b1fa9fb9298b4824591b3dd8 (patch)
tree70884f82ba2de1d015e1f011cfbeaae6f759dc4d
parent19b27cbd4aa9a0eae9eb89a1ec34184ad00c1134 (diff)
parent60980407544983c6f254eaa2ca9fb18b3746e6cb (diff)
downloadtcl-12858c0d2021df00b1fa9fb9298b4824591b3dd8.zip
tcl-12858c0d2021df00b1fa9fb9298b4824591b3dd8.tar.gz
tcl-12858c0d2021df00b1fa9fb9298b4824591b3dd8.tar.bz2
Test fails with Windows in CI, not MSVC
-rw-r--r--tests/socket.test4
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/socket.test b/tests/socket.test
index 9d2e5eb..e6f9c4f 100644
--- a/tests/socket.test
+++ b/tests/socket.test
@@ -80,6 +80,8 @@ testConstraint notWine [expr {![info exists ::env(CI_USING_WINE)]}]
testConstraint thread [expr {0 == [catch {package require Thread 2.7-}]}]
testConstraint exec [llength [info commands exec]]
testConstraint knownMsvcBug [expr {![info exists ::env(CI_BUILD_WITH_MSVC)]}]
+testConstraint notWinCI [expr {
+ $tcl_platform(platform) ne "windows" || ![info exists ::env(CI)]}]
# Produce a random port number in the Dynamic/Private range
# from 49152 through 65535.
@@ -2392,7 +2394,7 @@ test socket-14.10.1 {pending [socket -async] and nonblocking [puts], server is I
removeFile script
} -result {{} ok}
test socket-14.11.0 {pending [socket -async] and nonblocking [puts], no listener, no flush} \
- -constraints {socket knownMsvcBug} \
+ -constraints {socket notWinCI} \
-body {
set sock [socket -async localhost [randport]]
fconfigure $sock -blocking 0