module Status : sig ... end
type t
= Async_kernel__.Types.Event.t
=
{
mutable alarm : Async_kernel__.Job_or_event.t Alarm.t; |
mutable at : Time_ns.t; |
callback : unit ‑> unit; |
execution_context : Async_kernel.Execution_context.t; |
mutable interval : Time_ns.Span.t option; |
mutable next_fired : t; |
mutable status : Status.t; |
}
val interval : t ‑> Time_ns.Span.t option
val set_interval : t ‑> Time_ns.Span.t option ‑> unit
val execution_context : t ‑> Async_kernel.Execution_context.t
val callback : t ‑> unit ‑> unit
val alarm : t ‑> Async_kernel__.Job_or_event.t Alarm.t
val set_alarm : t ‑> Async_kernel__.Job_or_event.t Alarm.t ‑> unit
module Fields : sig ... end
val none : t
val is_none : t ‑> bool
val is_some : t ‑> bool
val sexp_of_t : t ‑> Base.Sexp.t
val invariant : t ‑> unit