(** removes a file if it exists *)
val safe_remove: string -> unit
+(** 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
val absolute_path: string -> string
val normalize_dir: string -> string (** add trailing "/" if missing *)
val strip_suffix: suffix:string -> string -> string
-val list_uniq: 'a list -> 'a list (* uniq unix filter on lists *)
-
(** @return tl tail of a list starting at a given element
* @param eq equality to be used, defaults to physical equality (==)
* @raise Not_found *)