object
val mutable epoch_ : Cf_tai64n.t option
val mutable put_ : < get : 'a > Queue.t option
val mutable state_ : 'a state
method canget : bool
method get : 'a
method load : ?q:< get : 'a > Queue.t -> t -> unit
method private load_ : t -> unit
method private virtual service : t -> 'a state
method unload : unit
method private unload_ : t -> unit
end