Happstack.Server.Internal.Socket
acceptLite
sockAddrToPeer