module Alarm: sig
.. end
type 'a
t
val null : unit -> 'a t
null ()
returns an alarm t
such that not (mem timing_wheel t)
for all
timing_wheel
s.
val at : 'a Timing_wheel_intf.Timing_wheel.timing_wheel ->
'a t -> Time.t
All Alarm
functions will raise if not (Timing_wheel.mem timing_wheel t)
.
val interval_num : 'a Timing_wheel_intf.Timing_wheel.timing_wheel ->
'a t -> Timing_wheel_intf.Interval_num.t
val value : 'a Timing_wheel_intf.Timing_wheel.timing_wheel ->
'a t -> 'a
val sexp_of_t : ('a -> Sexplib.Sexp.t) ->
'a t -> Sexplib.Sexp.t
null ()
returns an alarm t
such that not (mem timing_wheel t)
for all
timing_wheel
s.
All Alarm
functions will raise if not (Timing_wheel.mem timing_wheel t)
.