Module Network_pool.Rate_limiter

type t
val create : capacity:(int * [ `Per of Core.Time.Span.t ]) -> t
val add : t -> Network_peer.Envelope.Sender.t -> now:Core.Time.t -> score:int -> [ `Within_capacity | `Capacity_exceeded ]
val next_expires : t -> Network_peer.Envelope.Sender.t -> Core.Time.t
val summary : t -> Yojson.Safe.t