Module Procfs.Process.Fd

module Fd: sig .. end

type fd_stat =

`\|`	`Path of string`
`\|`	`Socket of Procfs.Process.Inode.t`
`\|`	`Pipe of Procfs.Process.Inode.t`
`\|`	`Inotify`

type t = {

	`fd :int;`	`(*`	File descriptor (0=stdin, 1=stdout, etc.)	`*)`
	`fd_stat :fd_stat;`	`(*`	Kind of file	`*)`

}

val fd_stat : t -> fd_stat

val fd : t -> int

module Fields: sig .. end

val fd_stat_of_sexp : Sexplib.Sexp.t -> fd_stat

val sexp_of_fd_stat : fd_stat -> Sexplib.Sexp.t

val t_of_sexp : Sexplib.Sexp.t -> t

val sexp_of_t : t -> Sexplib.Sexp.t