Transition_frontier.Catchup_tree
type t =
| Hash of Catchup_hash_tree.t
| Full of Full_catchup_tree.t
val max_catchup_chain_length : t -> int
val apply_diffs : t -> Frontier_base.Diff.Full.E.t list -> unit
val create : [< `Normal | `Super ] -> root:Frontier_base.Breadcrumb.t -> t