type t
=
|
Of_current_buffer
Root
This of string
include sig ... end
val sexp_of_t : t ‑> Base.Sexp.t
val within : t ‑> f:(unit ‑> 'a) ‑> 'a