summaryrefslogtreecommitdiffstats
path: root/tests/socket.test
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2020-11-17 12:36:59 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2020-11-17 12:36:59 (GMT)
commit60980407544983c6f254eaa2ca9fb18b3746e6cb (patch)
tree160b0b29b1c85dcab7155342fa714ad4c6be04be /tests/socket.test
parent48385f8bba5fca0601d69f21d356e1db56bf0fa9 (diff)
downloadtcl-60980407544983c6f254eaa2ca9fb18b3746e6cb.zip
tcl-60980407544983c6f254eaa2ca9fb18b3746e6cb.tar.gz
tcl-60980407544983c6f254eaa2ca9fb18b3746e6cb.tar.bz2
Test fails with Windows in CI, not MSVC
Diffstat (limited to 'tests/socket.test')
-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