Module Ecaml.Working_directory

type t =
  1. | Of_current_buffer
  2. | Root
  3. | This of string
val sexp_of_t : t -> Sexplib0.Sexp.t
val to_filename : t -> string
val within : t -> (_, 'r) Sync_or_async.t -> f:(unit -> 'r) -> 'r