module IO

val exhaust : Pervasives.in_channel -> string

val invoke : string -> string option

val winvoke : (unit -> unit) list -> string -> (unit -> unit) list -> string