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) Pervasives.result   val revive :     B00.Op_cache.t ->     B00.Op.t -> (B0_std.Fpath.t list option, string) Pervasives.result   val add : B00.Op_cache.t -> B00.Op.t -> (bool, string) Pervasives.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