Cf_tai64n.t ->
object
  val mutable epoch_ : Cf_tai64n.t
  val mutable put_ : < get : 'a > Queue.t option
  val mutable state_ : [> 'a state_t ] as 'b
  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 -> 'b
  method unload : unit
  method private unload_ : t -> unit
end