We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent cbd67cc commit bd50c53Copy full SHA for bd50c53
tests/Network/SocketSpec.hs
@@ -45,10 +45,12 @@ spec = do
45
sock <- socket (addrFamily addr) (addrSocketType addr) (addrProtocol addr)
46
bind sock $ addrAddress addr
47
48
+{- This does not work on Windows and Linux.
49
it "fails to bind to unknown ipv4 socket" $ do
50
addr:_ <- getAddrInfo (Just hints) (Just "127.0.0.3") Nothing
51
52
bind sock (addrAddress addr) `shouldThrow` anyIOException
53
+-}
54
55
it "successfully binds to an ipv6 socket" $ do
56
addr:_ <- getAddrInfo (Just hints) (Just serverAddr6) Nothing
0 commit comments