type t
=
|
Ok
Currently_happening
Previously_aborted
Previously_happened
val sexp_of_t : t ‑> Base.Sexp.t