-
-val is_dir: string -> bool (** @return true if file is a directory *)
-val is_regular: string -> bool (** @return true if file is a regular file *)
-
-val input_file: string -> string (** read all the contents of file to string *)
-val output_file: string -> string -> unit (** write string to file *)
+(** removes a dir if it exists and is empty *)
+val safe_rmdir: string -> unit
+(** checks if the dir is empty *)
+val is_dir_empty: string -> bool
+(** removes a directory and recursively the father (if empty) *)
+val rmdir_descend: string -> unit