type ('a, 'h) t
=
|
Aborted of 'a
Happened of 'h
Scheduled_at of Async_kernel__.Import.Time_ns.t
include sig ... end
val sexp_of_t : ('a ‑> Base.Sexp.t) ‑> ('h ‑> Base.Sexp.t) ‑> ('a, 'h) t ‑> Base.Sexp.t