Module Event.Abort_result

type ('a, 'h) t =
| Ok
| Previously_aborted of 'a
| Previously_happened of 'h
val sexp_of_t : ('a -> Ppx_sexp_conv_lib.Sexp.t) -> ('h -> Ppx_sexp_conv_lib.Sexp.t) -> ('a, 'h) t -> Ppx_sexp_conv_lib.Sexp.t