Module Async_kernel__Synchronous_time_source0.Alarm

include Core_kernel.Timing_wheel_ns.Alarm
type 'a t
include sig ... end
val sexp_of_t : ('a ‑> Base.Sexp.t) ‑> 'a t ‑> Base.Sexp.t
val null : Core_kernel__.Import.unit ‑> _ t

null () returns an alarm t such that not (mem timing_wheel t) for all timing_wheels.

val at : 'a Core_kernel.Timing_wheel_ns.timing_wheel ‑> 'a t ‑> Core_kernel.Timing_wheel_ns.Time.t

All Alarm functions will raise if not (Timing_wheel.mem timing_wheel t).

val value : 'a Core_kernel.Timing_wheel_ns.timing_wheel ‑> 'a t ‑> 'a
val is_null : 'a t ‑> bool