Brassaia_eio.Store_intfmodule type S_generic_key = sig ... endmodule type S = sig ... endmodule S_is_a_generic_keyed (X : S) : S_generic_keymodule type Maker_generic_key = sig ... endmodule type Maker =
Maker_generic_key
with type ('h, _) contents_key = 'h
and type 'h node_key = 'h
and type 'h commit_key = 'hmodule type Json_tree =
functor (Store : S with type Schema.Contents.t = Contents.json) ->
sig ... endmodule type KV_generic_key = S_generic_key with type Schema.Branch.t = stringmodule type KV = S with type Schema.Branch.t = stringmodule type KV_maker_generic_key = sig ... endmodule type KV_maker =
KV_maker_generic_key
with type ('h, _) contents_key = 'h
and type 'h node_key = 'h
and type 'h commit_key = 'hmodule type Sigs = sig ... end