Responder (syncable_ledger.Syncable

type t

val create : 
  Inputs.MT.t ->
  ( Inputs.Addr.t Query.t -> unit ) ->
  logger:Logger.t ->
  trust_system:Trust_system.t ->
  t

val answer_query : 
  t ->
  Inputs.Addr.t Query.t Network_peer.Envelope.Incoming.t ->
  ( Inputs.Hash.t, Inputs.Account.t ) Answer.t option Async_kernel.Deferred.t