Module T1.Event
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 status : t -> Status.t
val set_status : t -> Status.t -> unit
val next_fired : t -> t
val set_next_fired : t -> t -> unit
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 at : t -> Time_ns.t
val set_at : t -> Time_ns.t -> 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