module Event: sig .. end
sig
end
at
after
type t
val status : t -> [ `Aborted | `Happened | `Waiting ]
t -> [ `Aborted | `Happened | `Waiting ]
val abort : t -> [ `Ok | `Previously_aborted | `Previously_happened ]
t -> [ `Ok | `Previously_aborted | `Previously_happened ]