module ConnectionKey where

import Network.Socket ( SockAddr(..) )
import SockAddr ()

newtype PeerAddress = PeerAddress SockAddr
    deriving (Eq,Ord,Show)

newtype ClientAddress = ClientAddress SockAddr
    deriving (Eq,Ord,Show)