remove old+unused code

[libfirm] / ir / opt / gvn_pre.c

diff --git a/ir/opt/gvn_pre.c b/ir/opt/gvn_pre.c
index 00b62a7..f4407fa 100644 (file)
--- a/ir/opt/gvn_pre.c
+++ b/ir/opt/gvn_pre.c
@@ -138,11 +138,11 @@ static ir_node *add(ir_node *e, ir_node *v)
  */
 static ir_node *lookup(ir_node *e)
 {
-       ir_node *value = ir_nodemap_get(&value_map, e);
+       ir_node *value = (ir_node*)ir_nodemap_get(&value_map, e);
        if (value != NULL)
                return identify_remember(value);
        return NULL;
-}  /* lookup */
+}
 
 /**
  * Return the block info of a block.
@@ -151,8 +151,8 @@ static ir_node *lookup(ir_node *e)
  */
 static block_info *get_block_info(ir_node *block)
 {
-       return get_irn_link(block);
-}  /* get_block_info */
+       return (block_info*)get_irn_link(block);
+}
 
 /**
  * Allocate a block info for a block.
@@ -191,7 +191,7 @@ static int is_nice_value(ir_node *n)
                return 0;
        mode = get_irn_mode(n);
        if (!mode_is_data(mode)) {
-               if (! is_Div(n) && ! is_Mod(n) && ! is_DivMod(n))
+               if (! is_Div(n) && ! is_Mod(n))
                        return 0;
                if (! is_NoMem(get_fragile_op_mem(n)))
                        return 0;
@@ -207,7 +207,7 @@ static int is_nice_value(ir_node *n)
  * @param txt    a text to describe the set
  * @param block  the owner block of the set
  */
-static void dump_value_set(ir_valueset_t *set, char *txt, ir_node *block)
+static void dump_value_set(ir_valueset_t *set, const char *txt, ir_node *block)
 {
        ir_valueset_iterator_t iter;
        ir_node *value, *expr;
@@ -232,12 +232,12 @@ static void dump_value_set(ir_valueset_t *set, char *txt, ir_node *block)
 #endif /* DEBUG_libfirm */
 
 /**
- * Topological walker. Allocates block info for every block and place nodes in topological
- * order into the nodes set.
+ * Topological walker. Allocates block info for every block and place nodes in
+ * topological order into the nodes set.
  */
 static void topo_walker(ir_node *irn, void *ctx)
 {
-       pre_env    *env = ctx;
+       pre_env    *env = (pre_env*)ctx;
        ir_node    *block;
        block_info *info;
        ir_node    *value;
@@ -264,7 +264,7 @@ static void topo_walker(ir_node *irn, void *ctx)
        info  = get_block_info(block);
 
        ir_valueset_insert(info->exp_gen, value, irn);
-}  /* topo_walker */
+}
 
 /**
  * Computes Avail_out(block):
@@ -281,7 +281,7 @@ static void topo_walker(ir_node *irn, void *ctx)
  */
 static void compute_avail_top_down(ir_node *block, void *ctx)
 {
-       pre_env    *env = ctx;
+       pre_env    *env = (pre_env*)ctx;
        block_info *dom_info;
        block_info *info = get_block_info(block);
        ir_node    *dom_blk;
@@ -307,7 +307,7 @@ static void compute_avail_top_down(ir_node *block, void *ctx)
        value_union(info->avail_out, info->exp_gen);
 
        dump_value_set(info->avail_out, "Avail_out", block);
-}  /* compute_avail_top_down */
+}
 
 /**
  * check if a node n is clean in block block.
@@ -381,7 +381,7 @@ static ir_node *phi_translate(ir_node *node, ir_node *block, int pos, ir_valuese
                ir_node *trans;
 
                leader = leader != NULL ? leader : pred;
-               trans  = ir_valueset_lookup(translated, leader);
+               trans  = (ir_node*)ir_valueset_lookup(translated, leader);
 
                if ((trans != NULL && trans != leader) || (is_Phi(leader) && get_nodes_block(leader) == block))
                        break;
@@ -409,7 +409,7 @@ static ir_node *phi_translate(ir_node *node, ir_node *block, int pos, ir_valuese
                ir_node *trans;
 
                leader = leader != NULL ? leader : pred;
-               trans  = ir_valueset_lookup(translated, leader);
+               trans  = (ir_node*)ir_valueset_lookup(translated, leader);
                if (trans == NULL)
                        trans = leader;
 
@@ -430,7 +430,7 @@ static ir_node *phi_translate(ir_node *node, ir_node *block, int pos, ir_valuese
  */
 static void compute_antic(ir_node *block, void *ctx)
 {
-       pre_env    *env = ctx;
+       pre_env    *env = (pre_env*)ctx;
        block_info *succ_info;
        block_info *info = get_block_info(block);
        ir_node    *succ, *value, *expr;
@@ -536,7 +536,7 @@ static void compute_antic(ir_node *block, void *ctx)
  */
 static void insert_nodes(ir_node *block, void *ctx)
 {
-       pre_env    *env = ctx;
+       pre_env    *env = (pre_env*)ctx;
        ir_node    *value, *expr, *idom, *first_s, *worklist;
        block_info *curr_info, *idom_info;
        int        pos, arity = get_irn_arity(block);
@@ -603,7 +603,7 @@ static void insert_nodes(ir_node *block, void *ctx)
                                v_prime = value;
 
                        pred_info = get_block_info(pred_blk);
-                       e_dprime  = ir_valueset_lookup(pred_info->avail_out, v_prime);
+                       e_dprime  = (ir_node*)ir_valueset_lookup(pred_info->avail_out, v_prime);
 
                        if (e_dprime == NULL) {
                                pred_info->avail     = e_prime;
@@ -639,7 +639,8 @@ static void insert_nodes(ir_node *block, void *ctx)
 
                                /* ignore bad blocks. */
                                if (is_Bad(pred_blk)) {
-                                       in[pos] = new_Bad();
+                                       ir_graph *irg = get_irn_irg(pred_blk);
+                                       in[pos] = new_r_Bad(irg);
                                        continue;
                                }
 
@@ -715,7 +716,7 @@ static void insert_nodes(ir_node *block, void *ctx)
  */
 static void eliminate(ir_node *irn, void *ctx)
 {
-       pre_env *env = ctx;
+       pre_env *env = (pre_env*)ctx;
 
        if (!is_Block(irn)) {
                ir_node *block = get_nodes_block(irn);
@@ -723,7 +724,7 @@ static void eliminate(ir_node *irn, void *ctx)
                ir_node *value = lookup(irn);
 
                if (value != NULL) {
-                       ir_node *expr = ir_valueset_lookup(bl->avail_out, value);
+                       ir_node *expr = (ir_node*)ir_valueset_lookup(bl->avail_out, value);
 
                        if (expr != NULL && expr != irn) {
                                elim_pair *p = OALLOC(env->obst, elim_pair);
@@ -815,10 +816,6 @@ void do_gvn_pre(ir_graph *irg)
        a_env.end_block   = get_irg_end_block(irg);
        a_env.pairs       = NULL;
 
-       /* Move Proj's into the same block as their args,
-          else we would assign the result to wrong blocks */
-       normalize_proj_nodes(irg);
-
        /* critical edges MUST be removed */
        remove_critical_cf_edges(irg);