Update tests to changes in n-t-tcp.

facundominguez · facundominguez · commit 4633c146d0ca · 2017-08-21T13:04:45.000-03:00
diff --git a/distributed-process-tests/tests/runTCP.hs b/distributed-process-tests/tests/runTCP.hs
@@ -25,6 +25,7 @@ main = do
     hSetBuffering stderr LineBuffering
     Right (transport, internals) <-
       createTransportExposeInternals "127.0.0.1" "8080"
+        (\sn -> ("127.0.0.1", sn))
         defaultTCPParameters { transportConnectTimeout = Just 3000000 }
     ts <- tests TestTransport
       { testTransport = transport
