Ledger_catchup (ledger_catchup.Ledger

module Best_tip_lru : sig ... end

module type CONTEXT = sig ... end

module Catchup_jobs : sig ... end

val run : 
  context:(module CONTEXT) ->
  trust_system:Trust_system.t ->
  verifier:Verifier.t ->
  network:Mina_networking.t ->
  frontier:Transition_frontier.t ->
  catchup_job_reader:
    (Mina_base.State_hash.t
     * (( Mina_block.initial_valid_block Network_peer.Envelope.Incoming.t,
          Mina_base.State_hash.t )
          Cache_lib.Cached.t
        * Mina_net2.Validation_callback.t option)
         Rose_tree.t
         list)
      Pipe_lib.Strict_pipe.Reader.t ->
  catchup_breadcrumbs_writer:
    ( (( Transition_frontier.Breadcrumb.t, Mina_base.State_hash.t )
         Cache_lib.Cached.t
       * Mina_net2.Validation_callback.t option)
        Rose_tree.t
        list
      * [ `Ledger_catchup of unit Async_kernel.Ivar.t | `Catchup_scheduler ],
      Pipe_lib.Strict_pipe.crash Pipe_lib.Strict_pipe.buffered,
      unit )
      Pipe_lib.Strict_pipe.Writer.t ->
  unprocessed_transition_cache:
    Transition_handler.Unprocessed_transition_cache.t ->
  unit