Mina_base.Sparse_ledger_basemodule Stable : sig ... endtype t = Stable.Latest.tval to_yojson : t -> Yojson.Safe.ttype sparse_ledger = tmodule Global_state : sig ... endmodule L :
Ledger_intf.S with type t = t Core_kernel.ref and type location = intval merkle_root : t -> Ledger_hash.tval depth : t -> intval path_exn :
t ->
int ->
[ `Left of Ledger_hash.t | `Right of Ledger_hash.t ] listval find_index_exn : t -> Account_id.t -> intval of_root : depth:int -> Ledger_hash.t -> tval empty : depth:int -> unit -> tCreate a new 'empty' ledger. This ledger has an invalid root hash, and cannot be used except as a placeholder.
val add_path :
t ->
[ `Left of Snark_params.Tick.Field.t | `Right of Snark_params.Tick.Field.t ]
list ->
Account_id.t ->
Account.t ->
tval iteri : t -> f:( Account.Index.t -> Account.t -> unit ) -> unitval handler : t -> Snark_params.Tick.Handler.t Core_kernel.Staged.tval has_locked_tokens_exn :
global_slot:Mina_numbers.Global_slot.t ->
account_id:Account_id.t ->
t ->
bool