sig
  type t =
      Char
    | Fifo
    | File
    | Socket of [ `Active | `Bound | `Passive | `Unconnected ]
  val infer_using_stat :
    Core.Std.Unix.File_descr.t -> Fd.Kind.t Import.Deferred.t
end