module Dir:sig
..end
val exists : As_path.t -> bool As_cmd.result
val getcwd : unit -> As_path.t As_cmd.result
val chdir : As_path.t -> unit As_cmd.result
val fold_files_rec : ?skip:string list ->
(string -> 'a -> 'a As_cmd.result) -> 'a -> string list -> 'a As_cmd.result