#include "irphase_t.h"
#include "iredges_t.h"
-#include "beirg_t.h"
-#include "besched_t.h"
+#include "statev.h"
+
+#include "beirg.h"
+#include "besched.h"
+#include "belive_t.h"
/**
* Check dominance of two nodes in the same block.
* @param b The second node.
* @return 1 if a comes before b in the same block or if a == b, 0 else.
*/
-static INLINE int _value_dominates_intrablock(const ir_node *a, const ir_node *b)
+static inline int _value_dominates_intrablock(const ir_node *a, const ir_node *b)
{
/* TODO: ? : can be removed?! */
- sched_timestep_t as = is_Phi(a) ? 0 : sched_get_time_step(a);
- sched_timestep_t bs = is_Phi(b) ? 0 : sched_get_time_step(b);
+ sched_timestep_t as = sched_is_scheduled(a) ? sched_get_time_step(a) : 0;
+ sched_timestep_t bs = sched_is_scheduled(b) ? sched_get_time_step(b) : 0;
return as <= bs;
}
* @param b The second node.
* @return 1 if a comes before b in the same block, 0 else.
*/
-static INLINE int _value_strictly_dominates_intrablock(const ir_node *a, const ir_node *b)
+static inline int _value_strictly_dominates_intrablock(const ir_node *a, const ir_node *b)
{
/* TODO: ? : can be removed?! */
- sched_timestep_t as = is_Phi(a) ? 0 : sched_get_time_step(a);
- sched_timestep_t bs = is_Phi(b) ? 0 : sched_get_time_step(b);
+ sched_timestep_t as = sched_is_scheduled(a) ? sched_get_time_step(a) : 0;
+ sched_timestep_t bs = sched_is_scheduled(b) ? sched_get_time_step(b) : 0;
return as < bs;
}
* @param b The second node.
* @return 1 if a dominates b or if a == b, 0 else.
*/
-static INLINE int _value_dominates(const ir_node *a, const ir_node *b)
+static inline int _value_dominates(const ir_node *a, const ir_node *b)
{
- const ir_node *block_a = get_block(a);
- const ir_node *block_b = get_block(b);
+ const ir_node *block_a = get_block_const(a);
+ const ir_node *block_b = get_block_const(b);
/*
* a and b are not in the same block,
* @param b The second node.
* @return 1 if a dominates b, 0 else.
*/
-static INLINE int _value_strictly_dominates(const ir_node *a, const ir_node *b)
+static inline int _value_strictly_dominates(const ir_node *a, const ir_node *b)
{
- const ir_node *block_a = get_block(a);
- const ir_node *block_b = get_block(b);
+ const ir_node *block_a = get_block_const(a);
+ const ir_node *block_b = get_block_const(b);
/*
* a and b are not in the same block,
* @param b The second value.
* @return 1, if a and b interfere, 0 if not.
*/
-static INLINE int _lv_values_interfere(const be_lv_t *lv, const ir_node *a, const ir_node *b)
+static inline int be_values_interfere(const be_lv_t *lv, const ir_node *a, const ir_node *b)
{
int a2b = _value_dominates(a, b);
int b2a = _value_dominates(b, a);
+ int res = 0;
+
+ /*
+ * Adjust a and b so, that a dominates b if
+ * a dominates b or vice versa.
+ */
+ if(b2a) {
+ const ir_node *t = a;
+ a = b;
+ b = t;
+ a2b = 1;
+ }
/* If there is no dominance relation, they do not interfere. */
- if((a2b | b2a) > 0) {
+ if(a2b) {
const ir_edge_t *edge;
- ir_node *bb;
-
- /*
- * Adjust a and b so, that a dominates b if
- * a dominates b or vice versa.
- */
- if(b2a) {
- const ir_node *t = a;
- a = b;
- b = t;
- }
+ ir_node *bb = get_nodes_block(b);
- bb = get_nodes_block(b);
+ //stat_ev_dbl("beintlive_ignore", arch_irn_is(lv->birg->main_env->arch_env, a, ignore));
/*
* If a is live end in b's block it is
* live at b's definition (a dominates b)
*/
- if(be_is_live_end(lv, bb, a))
- return 1;
+ if(be_is_live_end(lv, bb, a)) {
+ res = 1;
+ goto end;
+ }
/*
* Look at all usages of a.
*/
foreach_out_edge(a, edge) {
const ir_node *user = get_edge_src_irn(edge);
- if(get_nodes_block(user) == bb && !is_Phi(user) && _value_strictly_dominates(b, user))
- return 1;
+ if(get_nodes_block(user) == bb && !is_Phi(user) && _value_strictly_dominates(b, user)) {
+ res = 1;
+ goto end;
+ }
}
}
- return 0;
+end:
+ return res;
}
* @param edge The use.
* @return 1, if @p irn dominates the use @p edge.
*/
-static INLINE int _dominates_use(const ir_node *irn, const ir_edge_t *edge)
+static inline int _dominates_use(const ir_node *irn, const ir_edge_t *edge)
{
ir_node *use = get_edge_src_irn(edge);
* @param edge The use.
* @return 1, if @p irn strictly dominates the use @p edge.
*/
-static INLINE int _strictly_dominates_use(const ir_node *irn, const ir_edge_t *edge)
+static inline int _strictly_dominates_use(const ir_node *irn, const ir_edge_t *edge)
{
return get_edge_src_irn(edge) != irn && _dominates_use(irn, edge);
}
* @param where The location to check for.
* @return 1, if @p irn is live in front of @p where.
*/
-static INLINE int _be_lv_chk_before_irn(const be_irg_t *birg, const ir_node *irn, const ir_node *where)
+static inline int _be_lv_chk_before_irn(const be_irg_t *birg, const ir_node *irn, const ir_node *where)
{
const be_lv_t *lv = be_get_birg_liveness(birg);
const ir_edge_t *edge;
* @param where The location to check for.
* @return 1, if @p irn is live after @p where.
*/
-static INLINE int _be_lv_chk_after_irn(const be_irg_t *birg, const ir_node *irn, const ir_node *where)
+static inline int _be_lv_chk_after_irn(const be_irg_t *birg, const ir_node *irn, const ir_node *where)
{
const be_lv_t *lv = be_get_birg_liveness(birg);
const ir_edge_t *edge;
#define value_dominates_intrablock(a, b) _value_dominates_intrablock(a, b)
#define value_dominates(a, b) _value_dominates(a, b)
-#define values_interfere(birg, a, b) _lv_values_interfere(be_get_birg_liveness(birg), a, b)
#define dominates_use(a, e) _dominates_use(a, e)
#define strictly_dominates_use(a, e) _strictly_dominates_use(a, e)
#define be_lv_chk_before_irn(birg, a, b) _be_lv_chk_before_irn(birg, a, b)
projects / libfirm / blobdiff