Fs.File
type t = file
val create : directory:Directory.t -> name:string -> t
val dirname : t -> Directory.t
val basename : t -> t
val append : Directory.t -> t -> t
val set_ext : string -> t -> t
val has_ext : string -> t -> bool
val get_ext : t -> string
val of_string : string -> t
val to_string : t -> string
val segs : t -> string list
val read : t -> (string, [> Or_error.msg ]) Or_error.result
val exists : t -> bool
module Table : Hashtbl.S with type key = t