Uptime_snark_worker (uptime_service.Uptime_service.Uptime_snark

module Prod : sig ... end

module Worker_state : sig ... end

module Worker : sig ... end

type t = {

connection : Worker.Connection.t;

process : Async.Process.t;

logger : Logger.Stable.Latest.t;

}

val create : 
  logger:Logger.t ->
  pids:Child_processes.Termination.t ->
  t Async.Deferred.t

val perform_single : 
  t ->
  (Mina_base.Sok_message.t * Prod.single_spec) ->
  (Ledger_proof.t * Core_kernel.Time.Span.t) Core_kernel.Or_error.t
    Core.Or_error.t
    Async.Deferred.t