@@ -471,7 +471,7 @@ apiNewEndPoint transport = try $ do
471471apiConnect :: LocalEndPoint -- ^ Local end point
472472 -> EndPointAddress -- ^ Remote address
473473 -> Reliability -- ^ Reliability (ignored)
474− -> ConnectHints -- ^ Hints (ignored for now)
474+ -> ConnectHints -- ^ Hints
475475 -> IO (Either (TransportError ConnectErrorCode) Connection)
476476apiConnect ourEndPoint theirAddress _reliability hints =
477477 if localAddress ourEndPoint == theirAddress
@@ -779,8 +779,6 @@ setupRemoteEndPoint (ourEndPoint, theirEndPoint) hints = do
779779 tryCloseSocket sock
780780 return False
781781 Right (sock, ConnectionRequestCrossed) -> do
782− -- We leave the endpoint in Init state, handleConnectionRequest will
783− -- take care of it
784782 resolveInit (ourEndPoint, theirEndPoint) (RemoteEndPointClosed Nothing)
785783 tryCloseSocket sock
786784 return False