Module Ecaml__.Working_directory

type t =
| Of_current_buffer
| Root
| This of string
val sexp_of_t : t -> Ppx_sexp_conv_lib.Sexp.t
val within : t -> f:(unit -> 'a) -> 'a