Module Time_source.Event

type ('a, 'h) 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
type t_unit = (unit, unit) t
val sexp_of_t_unit : t_unit -> Ppx_sexp_conv_lib.Sexp.t
include Core_kernel.Invariant.S2 with type ('a, 'b) t := ('a, 'b) t
val invariant : ('a -> unit) -> ('b -> unit) -> ('a, 'b) t -> unit
val scheduled_at : (_, _) t -> Core_kernel.Int63.t
module Status : sig ... end
val status : ('a, 'h) t -> ('a, 'h) Status.t
val run_at : [> Core_kernel.read ] T1.t -> Core_kernel.Int63.t -> ('z -> 'h) -> 'z -> (_, 'h) t
val run_after : [> Core_kernel.read ] T1.t -> Core_kernel.Int63.t -> ('z -> 'h) -> 'z -> (_, 'h) t
module Abort_result : sig ... end
val abort : ('a, 'h) t -> 'a -> ('a, 'h) Abort_result.t
val abort_exn : ('a, 'h) t -> 'a -> unit
val abort_if_possible : ('a, _) t -> 'a -> unit
module Fired : sig ... end
val fired : ('a, 'h) t -> ('a, 'h) Fired.t Async_kernel__Types.Deferred.t
module Reschedule_result : sig ... end
val reschedule_at : ('a, 'h) t -> Core_kernel.Int63.t -> ('a, 'h) Reschedule_result.t
val reschedule_after : ('a, 'h) t -> Core_kernel.Int63.t -> ('a, 'h) Reschedule_result.t
val at : [> Core_kernel.read ] T1.t -> Core_kernel.Int63.t -> (_, unit) t
val after : [> Core_kernel.read ] T1.t -> Core_kernel.Int63.t -> (_, unit) t