Module Runtime_config.Ledger

type base =
| Named of string(*

One of the named ledgers in Genesis_ledger

*)
| Accounts of Accounts.t(*

A ledger generated from the given accounts

*)
| Hash of string(*

The ledger with the given root hash

*)
val bin_shape_base : Core_kernel.Bin_prot.Shape.t
val __bin_read_base__ : ( int -> base ) Core_kernel.Bin_prot.Read.reader
val bin_read_base : base Core_kernel.Bin_prot.Read.reader
val bin_reader_base : base Core_kernel.Bin_prot.Type_class.reader
val bin_size_base : base Core_kernel.Bin_prot.Size.sizer
val bin_write_base : base Core_kernel.Bin_prot.Write.writer
val bin_writer_base : base Core_kernel.Bin_prot.Type_class.writer
val bin_base : base Core_kernel.Bin_prot.Type_class.t
type t = {
base : base;
num_accounts : int option;
balances : (int * Currency.Balance.Stable.Latest.t) list;
hash : string option;
name : string option;
add_genesis_winner : bool option;
}
val bin_shape_t : Core_kernel.Bin_prot.Shape.t
val __bin_read_t__ : ( int -> t ) Core_kernel.Bin_prot.Read.reader
val bin_read_t : t Core_kernel.Bin_prot.Read.reader
val bin_reader_t : t Core_kernel.Bin_prot.Type_class.reader
val bin_size_t : t Core_kernel.Bin_prot.Size.sizer
val bin_write_t : t Core_kernel.Bin_prot.Write.writer
val bin_writer_t : t Core_kernel.Bin_prot.Type_class.writer
val bin_t : t Core_kernel.Bin_prot.Type_class.t
val to_json_layout : t -> Json_layout.Ledger.t
val of_json_layout : Json_layout.Ledger.t -> ( t, string ) Core_kernel.Result.t
val to_yojson : t -> Yojson.Safe.t
val of_yojson : Yojson.Safe.t -> ( t, string ) Core_kernel.Result.t