sig
  type t
  val create :
    ?clock:B0_std.Time.counter ->
    ?hash_fun:(module B0_std.Hash.T-> B00.File_cache.t -> B00.Op_cache.t
  val set_op_hash :
    B00.Op_cache.t -> B00.Op.t -> (unit, string) Stdlib.result
  val revive :
    B00.Op_cache.t ->
    B00.Op.t -> (B0_std.Fpath.t list option, string) Stdlib.result
  val add : B00.Op_cache.t -> B00.Op.t -> (bool, string) Stdlib.result
  val hash_fun : B00.Op_cache.t -> (module B0_std.Hash.T)
  val file_hashes : B00.Op_cache.t -> B0_std.Hash.t B0_std.Fpath.Map.t
  val file_hash_dur : B00.Op_cache.t -> B0_std.Time.span
end