git.iko.soy/distributed-process
on master help sign in
Remove delay from test
c6f5d78Edsko de Vries
network-transport/tests/TestTCP.hs−1
compare with master
unifiedsplit
@@ -480,7 +480,6 @@ testMany nextPort = do
480
480
481 replicateM_ 20 $ do
481 replicateM_ 20 $ do
482 mTransport <- nextPort >>= createTransport "127.0.0.1"
482 mTransport <- nextPort >>= createTransport "127.0.0.1"
483− threadDelay 2000000
484 case mTransport of
483 case mTransport of
485 Left ex -> do
484 Left ex -> do
486 putStrLn $ "IOException: " ++ show ex ++ "; errno = " ++ show (ioe_errno ex)
485 putStrLn $ "IOException: " ++ show ex ++ "; errno = " ++ show (ioe_errno ex)