Module Cache

type metadata = Stdune.Sexp.t list
module File : sig ... end
type promotion =
  1. | Already_promoted of File.t
  2. | Promoted of File.t
type repository = {
  1. directory : string;
  2. remote : string;
  3. commit : string;
}
type command =
  1. | Dedup of File.t
module Duplication_mode : sig ... end
module type Cache = sig ... end
module type Caching = sig ... end
type caching = (module Caching)
val command_to_dyn : command -> Stdune__Dyn.t
module Key : sig ... end
val promotion_to_string : promotion -> string
val make_caching : (module Cache with type t = 'a) -> 'a -> (module Caching)
val cachable : Unix.file_kind -> bool
module Client : sig ... end
module Local : sig ... end
module Messages : sig ... end