LlvmFrontend
val capture : string -> IStdlib.IStd.In_channel.t -> unit
val capture_llair : string -> Llair.program -> unit