`sig
type channel = Glib.Io.channel
type condition = [ `ERR | `HUP | `IN | `NVAL | `OUT | `PRI ]
type id
val channel_of_descr : Unix.file_descr -> GMain.Io.channel
val add_watch :
cond:GMain.Io.condition list ->
callback:(GMain.Io.condition list -> bool) ->
?prio:int -> GMain.Io.channel -> GMain.Io.id
val remove : GMain.Io.id -> unit
val read : GMain.Io.channel -> buf:string -> pos:int -> len:int -> int
val read_chars :
GMain.Io.channel -> buf:string -> pos:int -> len:int -> int
end`