Module FileUtilMisc

module FileUtilMisc: sig .. end

module SetFilename: Stdlib.Set.Make(sig
type t = FilePath.filename 
val compare : FilePath.filename -> FilePath.filename -> int
end)
val doit : FileUtilTypes.interactive -> FilePath.filename -> bool
val prevent_recursion : SetFilename.t -> SetFilename.elt -> SetFilename.t
val solve_dirname : FilePath.filename -> FilePath.filename
type exc = [ `Exc of exn ] 
val handle_error_gen : string ->
(string -> ([> `Exc of exn ] as 'a) -> 'b) ->
('a -> string) -> (fatal:bool -> 'a -> 'b) * (fatal:bool -> exn -> 'b)