Protocol_state.Polymodule Stable : sig ... endtype ('state_hash, 'body) t = ( 'state_hash, 'body ) Stable.Latest.t = {previous_state_hash : 'state_hash; |
body : 'body; |
}val to_yojson :
( 'state_hash -> Yojson.Safe.t ) ->
( 'body -> Yojson.Safe.t ) ->
( 'state_hash, 'body ) t ->
Yojson.Safe.tval hash_fold_t :
( Ppx_hash_lib.Std.Hash.state -> 'state_hash -> Ppx_hash_lib.Std.Hash.state ) ->
( Ppx_hash_lib.Std.Hash.state -> 'body -> Ppx_hash_lib.Std.Hash.state ) ->
Ppx_hash_lib.Std.Hash.state ->
( 'state_hash, 'body ) t ->
Ppx_hash_lib.Std.Hash.stateinclude Ppx_sexp_conv_lib.Sexpable.S2
with type ('state_hash, 'body) t := ( 'state_hash, 'body ) tval t_of_sexp :
( Sexplib0__.Sexp.t -> 'a ) ->
( Sexplib0__.Sexp.t -> 'b ) ->
Sexplib0__.Sexp.t ->
( 'a, 'b ) tval sexp_of_t :
( 'a -> Sexplib0__.Sexp.t ) ->
( 'b -> Sexplib0__.Sexp.t ) ->
( 'a, 'b ) t ->
Sexplib0__.Sexp.t