Module FilePath_type

module FilePath_type: sig .. end

type current_dir_type = 

type filename_part = 

type filename = string 

type extension = string 

val begin_string : 'a -> 'b -> 'a * 'b

val add_string : string -> string * 'a -> string * 'a

val end_string : string * filename_part list -> filename_part list

val path_length : int