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
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