Generic_key.Makermodule X : Maker_argsinclude Key.Store_spec.S
with type ('h, 'v) contents_key = ('h, 'v) X.Contents_store.key
with type 'h node_key = 'h X.Node_store.key
with type 'h commit_key = 'h X.Commit_store.keytype ('h, 'v) contents_key = ('h, 'v) X.Contents_store.keytype 'h node_key = 'h X.Node_store.keytype 'h commit_key = 'h X.Commit_store.keymodule Make
(Schema : Schema.S) :
Store_intf.S_generic_key
with module Schema = Schema
and type Backend.Remote.endpoint = endpoint
and type contents_key = (Schema.Hash.t, Schema.Contents.t) contents_key
and type node_key = Schema.Hash.t node_key
and type commit_key = Schema.Hash.t commit_key