#include "besched_t.h"
DEBUG_ONLY(static firm_dbg_module_t *dbg = NULL;)
-#define DUMP_GRAPHS
#define get_chordal_arch(ce) ((ce)->birg->main_env->arch_env)
#define get_reg(irn) arch_get_irn_register(get_chordal_arch(chordal_env), irn)
pin it
*/
ir_node *dupl = be_new_Copy(cls, chordal_env->irg, arg_block, arg);
+
+ /* this is commented out because it will fail in case of unknown float */
+#if 0
ir_mode *m_phi = get_irn_mode(phi), *m_dupl = get_irn_mode(dupl);
/*
assert(((mode_is_int(m_phi) && mode_is_int(m_dupl)) ||
(mode_is_float(m_phi) && mode_is_float(m_dupl))) &&
(get_mode_size_bits(m_phi) == get_mode_size_bits(m_dupl)));
+#endif /* if 0 */
set_irn_n(phi, i, dupl);
set_reg(dupl, phi_reg);
ir_node *perm = get_Proj_pred(arg);
ir_node *orig_val = get_irn_n(perm, get_Proj_proj(arg));
ir_node *dupl = be_new_Copy(cls, chordal_env->irg, arg_block, orig_val);
+
+ /* this is commented out because it will fail in case of unknown float */
+#if 0
ir_mode *m_phi = get_irn_mode(phi);
ir_mode *m_dupl = get_irn_mode(dupl);
assert(((mode_is_int(m_phi) && mode_is_int(m_dupl)) ||
(mode_is_float(m_phi) && mode_is_float(m_dupl))) &&
(get_mode_size_bits(m_phi) == get_mode_size_bits(m_dupl)));
+#endif /* if 0 */
set_irn_n(phi, i, dupl);
set_reg(dupl, phi_reg);
DBG((dbg, LEVEL_1, "Placing perms...\n"));
irg_block_walk_graph(irg, insert_all_perms_walker, NULL, chordal_env);
-#ifdef DUMP_GRAPHS
- be_dump(irg, "-ssa_destr_perms_placed", dump_ir_block_graph_sched);
-#endif
+
+ if (chordal_env->opts->dump_flags & BE_CH_DUMP_SSADESTR)
+ be_dump(irg, "-ssa_destr_perms_placed", dump_ir_block_graph_sched);
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
- be_dump(irg, "-ssa_destr_regs_set", dump_ir_block_graph_sched);
-#endif
+
+ if (chordal_env->opts->dump_flags & BE_CH_DUMP_SSADESTR)
+ be_dump(irg, "-ssa_destr_regs_set", dump_ir_block_graph_sched);
pmap_destroy(perm_map);
}