module HBS2.Net.PeerLocator where

import HBS2.Net.Proto

class (IsPeer peer, Monad m) => PeerLocator l peer m where
  knownPeers :: l -> m [Peer peer]