lib/file.mli

   1 module M = Metrics
   2
   3 type t =
   4   { path : string
   5   ; size : int
   6   }
   7
   8 val find : string -> t Stream.t
   9 (** Find all files in the directory tree, starting from the given root path *)
  10
  11 val lookup : string Stream.t -> t Stream.t
  12 (** Lookup file info for given paths *)
  13
  14 val head : t -> len:int -> metrics:M.t -> string
  15
  16 val filter_out_unique_sizes : t Stream.t -> metrics:M.t -> t Stream.t
  17 val filter_out_unique_heads : t Stream.t -> len:int -> metrics:M.t -> t Stream.t