Module Clock.Event

module Event: sig .. end

Events provide abortable versions of at and after.

type t

include Invariant.S

val status : t -> [ `Aborted | `Happened | `Waiting ]

val abort : t -> [ `Ok | `Previously_aborted | `Previously_happened ]

val at : Core.Std.Time.t -> t * [ `Aborted | `Happened ] Deferred.t

val after : Core.Std.Time.Span.t -> t * [ `Aborted | `Happened ] Deferred.t

val sexp_of_t : t -> Sexplib.Sexp.t