val print_assembly : out_channel -> Types.instr list -> unit

val phase : Main.phase_func