S.Responder
type t
val create : merkle_tree -> ( query -> unit ) -> logger:Logger.t -> trust_system:Trust_system.t -> t
val answer_query : t -> query Network_peer.Envelope.Incoming.t -> answer option Async_kernel.Deferred.t