@@ -82,13 +82,13 @@ data Connection = Connection {
8282-- | Event on an endpoint.
8383data Event =
8484 -- | Received a message
85− Received ConnectionId [ByteString]
85+ Received {-# UNPACK #-} !ConnectionId [ByteString]
8686 -- | Connection closed
87− | ConnectionClosed ConnectionId
87+ | ConnectionClosed {-# UNPACK #-} !ConnectionId
8888 -- | Connection opened
8989 --
9090 -- 'ConnectionId's need not be allocated contiguously.
91− | ConnectionOpened ConnectionId Reliability EndPointAddress
91+ | ConnectionOpened {-# UNPACK #-} !ConnectionId Reliability EndPointAddress
9292 -- | Received multicast
9393 | ReceivedMulticast MulticastAddress [ByteString]
9494 -- | The endpoint got closed (manually, by a call to closeEndPoint or closeTransport)