sig
type t = Find.t
type file_info = string * Core.Std.Unix.stats
module Options :
sig
type error_handler =
Find.Options.error_handler =
Ignore
| Print
| Raise
| Handle_with of (string -> unit)
type t =
Find.Options.t = {
min_depth : int;
max_depth : int option;
follow_links : bool;
on_open_errors : error_handler;
on_stat_errors : error_handler;
filter : (file_info -> bool) option;
skip_dir : (file_info -> bool) option;
relative_paths : bool;
}
val default : t
val ignore_errors : t
end
val create : ?options:Options.t -> string -> t
val next : t -> file_info option
val close : t -> unit
val iter : t -> f:(file_info -> unit) -> unit
val fold : t -> init:'a -> f:('a -> file_info -> 'a) -> 'a
val to_list : t -> file_info list
val find_all : ?options:Options.t -> string -> file_info list
end