sig
  type t =
      Char
    | Fifo
    | File
    | Socket of [ `Active | `Bound | `Passive | `Unconnected ]
  val sexp_of_t : Raw_fd.Kind.t -> Sexplib.Sexp.t
end