type t
=
|
Allow
Allow_and_send_last_value
Raise
include sig ... end
val sexp_of_t : t ‑> Base.Sexp.t