val add_dir : hidden:bool -> string -> unitval remove_dir : string -> unittype auto_include_callback =
(Dir.t -> string -> string option) ->
string ->
stringval get_path_list : unit -> string listtype paths = {visible : string list;hidden : string list;
}val get_paths : unit -> pathsval find : string -> stringval find_normalized : string -> stringtype visibility = | Visible| Hidden
val find_normalized_with_visibility : string -> string * visibilityval append_dir : Dir.t -> unitval prepend_dir : Dir.t -> unitval get_visible : unit -> Dir.t list