static INLINE int is_liveness_node(const ir_node *irn)
{
- return !is_Block(irn) && !is_Bad(irn);
+ switch(get_irn_opcode(irn)) {
+ case iro_Block:
+ case iro_Bad:
+ case iro_End:
+ return 0;
+ default:;
+ }
+
+ return 1;
}
int (be_lv_next_irn)(const struct _be_lv_t *lv, const ir_node *bl, unsigned flags, int i)
ir_node *use_block;
/*
- * If the usage is no data node, skip this use, since it does not
- * affect the liveness of the node.
- */
+ * If the usage is no data node, skip this use, since it does not
+ * affect the liveness of the node.
+ */
if(!is_liveness_node(use))
continue;
use_block = get_nodes_block(use);
/*
- * If the use is a phi function, determine the corresponding block
- * through which the value reaches the phi function and mark the
- * value as live out of that block.
- */
+ * If the use is a phi function, determine the corresponding block
+ * through which the value reaches the phi function and mark the
+ * value as live out of that block.
+ */
if(is_Phi(use)) {
ir_node *pred_block = get_Block_cfgpred_block(use_block, edge->pos);
live_end_at_block(lv, irn, pred_block, visited, 0);
}
/*
- * Else, the value is live in at this block. Mark it and call live
- * out on the predecessors.
- */
+ * Else, the value is live in at this block. Mark it and call live
+ * out on the predecessors.
+ */
else if(def_block != use_block) {
int i, n;
} spill_t;
typedef struct {
+ be_lv_t *lv;
ir_graph *irg;
set *spills;
ir_node **reloads;
sp1->spill, get_nodes_block(sp1->spill), get_irg_dump_name(env->irg),
sp2->spill, get_nodes_block(sp2->spill), get_irg_dump_name(env->irg));
env->problem_found = 1;
+ my_values_interfere(sp1->spill, sp2->spill);
+ printf("Intf: %d\n", values_interfere(env->lv, sp1->spill, sp2->spill));
}
}
}
env.spills = new_set(cmp_spill, 10);
env.reloads = NEW_ARR_F(ir_node*, 0);
env.problem_found = 0;
+ env.lv = be_liveness(irg);
irg_walk_graph(irg, collect_spills_walker, NULL, &env);
check_spillslot_interference(&env);
+ be_liveness_free(env.lv);
DEL_ARR_F(env.reloads);
del_set(env.spills);
-static sched_timestep_t get_time_step(const ir_node *irn)
-{
- if(is_Phi(irn))
- return 0;
-
- return sched_get_time_step(irn);
-}
-
-static int my_value_dominates(const ir_node *a, const ir_node *b)
-{
- int res = 0;
- const ir_node *ba = get_block(a);
- const ir_node *bb = get_block(b);
-
- /*
- * a and b are not in the same block,
- * so dominance is determined by the dominance of the blocks.
- */
- if(ba != bb) {
- res = block_dominates(ba, bb);
-
- /*
- * Dominance is determined by the time steps of the schedule.
- */
- } else {
- sched_timestep_t as = get_time_step(a);
- sched_timestep_t bs = get_time_step(b);
- res = as <= bs;
- }
-
- return res;
-}
-
/**
* Check, if two values interfere.
* @param a The first value.
{
const ir_edge_t *edge;
ir_node *bb;
- int a2b = my_value_dominates(a, b);
- int b2a = my_value_dominates(b, a);
+ int a2b = value_dominates(a, b);
+ int b2a = value_dominates(b, a);
/* If there is no dominance relation, they do not interfere. */
if(!a2b && !b2a)
if(b == user)
continue;
+ if(get_irn_opcode(user) == iro_End)
+ continue;
+
// in case of phi arguments we compare with the block the value comes from
if(is_Phi(user)) {
ir_node *phiblock = get_nodes_block(user);
+ if(phiblock == bb)
+ continue;
user = get_irn_n(phiblock, get_edge_src_pos(edge));
}
- if(my_value_dominates(b, user))
+ if(value_dominates(b, user))
return 1;
}