Module Event.Status

type ('a, 'h) t =
| Aborted of 'a
| Happened of 'h
| Scheduled_at of Time.t
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