[< Cf_poll.rwx_t ] ->
Unix.file_descr ->
object
  val mutable put_ : < get : 'a > Queue.t option
  val mutable state_ : [> 'Cf_poll.file_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 : Cf_poll.t -> 'b
  method unload : unit
  method private unload_ : t -> unit
end