if(chordal_env->opts->dump_flags & BE_CH_DUMP_CONSTR) {
snprintf(buf, sizeof(buf), "-%s-constr", chordal_env->cls->name);
- dump_ir_block_graph_sched(chordal_env->irg, buf);
+ be_dump(chordal_env->irg, buf, dump_ir_block_graph_sched);
}
be_numbering(irg);
if(cls) {
char buf[256];
snprintf(buf, sizeof(buf), "-%s%s", cls->name, suffix);
- dump_func(irg, buf);
+ be_dump(irg, buf, dump_func);
}
else
- dump_func(irg, suffix);
+ be_dump(irg, suffix, dump_func);
}
}
void (*dumper)(ir_graph *, const char *))
{
if(dump_flags & mask)
- dumper(irg, suffix);
+ be_dump(irg, suffix, dumper);
}
static void prepare_graph(be_irg_t *birg)
/* add Keeps for should_be_different constrained nodes */
assure_constraints(&birg);
+ dump(DUMP_PREPARED, irg, "-assured", dump_ir_block_graph);
+
/* Schedule the graphs. */
arch_code_generator_before_sched(birg.cg);
list_sched(env.arch_env, irg);
/* Insert copies for constraints */
handle_constraints(&raenv);
- dump_ir_block_graph_sched(irg, "-extern-constr");
+ be_dump(irg, "-extern-constr", dump_ir_block_graph_sched);
/* SSA destruction respectively transformation into "Conventional SSA" */
ssa_destr(&raenv);
- dump_ir_block_graph_sched(irg, "-extern-ssadestr");
+ be_dump(irg, "-extern-ssadestr", dump_ir_block_graph_sched);
/* Mapping of SSA-Values <--> Variables */
phi_class_compute(irg);
done = read_and_apply_results(&raenv, in);
ir_snprintf(in, sizeof(in), "-extern-%s-round-%d", raenv.cls->name, round);
- dump_ir_block_graph_sched(irg, in);
+ be_dump(irg, in, dump_ir_block_graph_sched);
round++;
} while (!done);
free(raenv.cls_vars);
}
- dump_ir_block_graph_sched(irg, "-extern-alloc");
+ be_dump(irg, "-extern-alloc", dump_ir_block_graph_sched);
/* Clean up */
set_foreach(raenv.vars, vi)
DBG((dbg, LEVEL_1, "Placing perms...\n"));
irg_block_walk_graph(irg, insert_all_perms_walker, NULL, chordal_env);
#ifdef DUMP_GRAPHS
- dump_ir_block_graph_sched(irg, "-ssa_destr_perms_placed");
+ be_dump(irg, "-ssa_destr_perms_placed", dump_ir_block_graph_sched);
#endif
be_liveness(irg);
DBG((dbg, LEVEL_1, "Setting regs and placing dupls...\n"));
irg_block_walk_graph(irg, set_regs_or_place_dupls_walker, NULL, chordal_env);
#ifdef DUMP_GRAPHS
- dump_ir_block_graph_sched(irg, "-ssa_destr_regs_set");
+ be_dump(irg, "-ssa_destr_regs_set", dump_ir_block_graph_sched);
#endif
pmap_destroy(perm_map);