sig
  type t = {
    read : Core_unix.file_descr list;
    write : Core_unix.file_descr list;
    except : Core_unix.file_descr list;
  }
  val empty : Core_unix.Select_fds.t
end