Sparse_ledger.T
module Stable : sig ... end
type ('hash, 'key, 'account) t = ( 'hash, 'key, 'account ) Stable.Latest.t = {
indexes : ('key * int) list; |
depth : int; |
tree : ( 'hash, 'account ) Tree.t; |
}
val to_yojson :
'hash 'key 'account. ( 'hash -> Yojson.Safe.t ) ->
( 'key -> Yojson.Safe.t ) ->
( 'account -> Yojson.Safe.t ) ->
( 'hash, 'key, 'account ) t ->
Yojson.Safe.t
val of_yojson :
'hash 'key 'account. ( Yojson.Safe.t ->
'hash Ppx_deriving_yojson_runtime.error_or ) ->
( Yojson.Safe.t -> 'key Ppx_deriving_yojson_runtime.error_or ) ->
( Yojson.Safe.t -> 'account Ppx_deriving_yojson_runtime.error_or ) ->
Yojson.Safe.t ->
( 'hash, 'key, 'account ) t Ppx_deriving_yojson_runtime.error_or
val _ :
( Yojson.Safe.t -> 'a Ppx_deriving_yojson_runtime.error_or ) ->
( Yojson.Safe.t -> 'b Ppx_deriving_yojson_runtime.error_or ) ->
( Yojson.Safe.t -> 'c Ppx_deriving_yojson_runtime.error_or ) ->
Yojson.Safe.t ->
( 'a, 'b, 'c ) t Ppx_deriving_yojson_runtime.error_or
val t_of_sexp :
'hash 'key 'account. ( Ppx_sexp_conv_lib.Sexp.t -> 'hash ) ->
( Ppx_sexp_conv_lib.Sexp.t -> 'key ) ->
( Ppx_sexp_conv_lib.Sexp.t -> 'account ) ->
Ppx_sexp_conv_lib.Sexp.t ->
( 'hash, 'key, 'account ) t
val sexp_of_t :
'hash 'key 'account. ( 'hash -> Ppx_sexp_conv_lib.Sexp.t ) ->
( 'key -> Ppx_sexp_conv_lib.Sexp.t ) ->
( 'account -> Ppx_sexp_conv_lib.Sexp.t ) ->
( 'hash, 'key, 'account ) t ->
Ppx_sexp_conv_lib.Sexp.t