type t
[
|
`File
`Directory
`Char
`Block
`Link
`Fifo
`Socket
]
include sig ... end
val sexp_of_t : t ‑> Base.Sexp.t