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 087af43 commit e76fdc7Copy full SHA for e76fdc7
tests/Network/SocketSpec.hs
@@ -34,7 +34,7 @@ spec = do
34
return sock
35
36
it "fails to connect and throws an IOException" $ do
37
- connect' (8080 :: Int) `shouldThrow` anyIOException
+ connect' (8003 :: Int) `shouldThrow` anyIOException
38
39
it "successfully connects to a socket with no exception" $ do
40
withPort $ \portVar -> test (tcp serverAddr return portVar)
0 commit comments