sig
type error_handler =
Ignore
| Print
| Raise
| Handle_with of (string -> unit)
type t = {
max_depth : int option;
follow_links : bool;
on_open_errors : Find.Options.error_handler;
on_stat_errors : Find.Options.error_handler;
filter : (Find.file_info -> bool) option;
skip_dir : (Find.file_info -> bool) option;
}
val default : Find.Options.t
val ignore_errors : Find.Options.t
end