const arch_isa_if_t *isa = &firm_isa;
obstack_init(&env->obst);
+ env->dbg = firm_dbg_register("be.main");
env->arch_env = obstack_alloc(&env->obst, sizeof(env->arch_env[0]));
arch_env_init(env->arch_env, isa);
ir_graph *irg = get_irp_irg(i);
be_main_session_env_t session;
+ DBG((env.dbg, LEVEL_1, "be irg: %F\n", irg));
+
/* Init the session. */
be_init_session_env(&session, &env, irg);
/* Schedule the graphs. */
list_sched(irg, trivial_selector);
+ dump_ir_block_graph_sched(irg, "-sched");
/* Verify the schedule */
sched_verify_irg(irg);
+ /* Build liveness information */
+ be_liveness(irg);
+
/* Remove all cases where a phi and one of its arguments interfere */
be_eliminate_phi_interferences(&session);
dump_ir_block_graph(session.irg, "-prephase");
/* Liveness analysis */
be_liveness(irg);
- dump_ir_block_graph_sched(irg, "-sched");
-
copystat_reset();
copystat_collect_irg(irg, env.arch_env);
- /*
- * Verifying the schedule once again cannot hurt.
- */
- sched_verify_irg(irg);
+ /*
+ * Verifying the schedule once again cannot hurt.
+ */
+ sched_verify_irg(irg);
/* Perform the following for each register class. */
for(j = 0, m = isa->get_n_reg_class(); j < m; ++j) {
be_chordal_env_t *chordal_env;
const arch_register_class_t *cls = isa->get_reg_class(j);
- be_numbering(irg);
- be_liveness(irg);
+ DBG((env.dbg, LEVEL_1, "\treg class: %s\n", cls->name));
+
+ be_numbering(irg);
+ be_liveness(irg);
chordal_env = be_ra_chordal(irg, env.arch_env, cls);
be_ssa_destruction_check(&session, chordal_env);
be_ra_chordal_check(chordal_env);
- be_ra_chordal_done(chordal_env);
- be_numbering_done(irg);
+ be_ra_chordal_done(chordal_env);
+ be_numbering_done(irg);
}
copystat_dump_pretty(irg);