sig
  type t
  val invariant : t Core_kernel.Invariant_intf.inv
  val create :
    create_fd:(Raw_fd.Kind.t ->
               Core.Std.Unix.File_descr.t -> Core.Std.Info.t -> Raw_fd.t) ->
    Interruptor.t
  val read_fd : Interruptor.t -> Raw_fd.t
  val thread_safe_interrupt : Interruptor.t -> unit
  val clear : Interruptor.t -> unit
  val sexp_of_t : Interruptor.t -> Sexplib.Sexp.t
end