cleanup: Remove unnecessary #include "beirg.h".

[libfirm] / ir / common / irtools.c

diff --git a/ir/common/irtools.c b/ir/common/irtools.c
index ca7cc20..e0a0f82 100644 (file)
--- a/ir/common/irtools.c
+++ b/ir/common/irtools.c
@@ -1,5 +1,5 @@
 /*
- * Copyright (C) 1995-2008 University of Karlsruhe.  All right reserved.
+ * Copyright (C) 1995-2011 University of Karlsruhe.  All right reserved.
  *
  * This file is part of libFirm.
  *
@@ -21,7 +21,6 @@
  * @file
  * @brief     Some often needed tool-functions
  * @author    Michael Beck
- * @version   $Id$
  */
 #include "config.h"
 
@@ -51,32 +50,52 @@ void firm_clear_node_and_phi_links(ir_node *n, void *env)
                set_Phi_next(n, NULL);
 }
 
+void firm_clear_block_phis(ir_node *node, void *env)
+{
+       (void) env;
+       if (is_Block(node)) {
+               set_Block_phis(node, NULL);
+       } else if (is_Phi(node)) {
+               set_Phi_next(node, NULL);
+       }
+}
+
+void firm_collect_block_phis(ir_node *node, void *env)
+{
+       (void) env;
+       if (is_Phi(node))
+               add_Block_phi(get_nodes_block(node), node);
+}
+
 void copy_irn_to_irg(ir_node *n, ir_graph *irg)
 {
-       ir_op *op = get_irn_op(n);
        ir_graph *old_irg;
        ir_node *nn = NULL;
 
        /* do not copy standard nodes */
-       if (op == op_Bad)
-               nn = get_irg_bad(irg);
-       else if (op == op_NoMem)
+       switch (get_irn_opcode(n)) {
+       case iro_NoMem:
                n = get_irg_no_mem(irg);
-       else if (op == op_Block) {
-               old_irg = get_irn_irg(n);
+               break;
 
+       case iro_Block:
+               old_irg = get_irn_irg(n);
                if (n == get_irg_start_block(old_irg))
                        nn = get_irg_start_block(irg);
                else if (n == get_irg_end_block(old_irg))
                        nn = get_irg_end_block(irg);
-       }
-       else if (op == op_Start)
+               break;
+
+       case iro_Start:
                nn = get_irg_start(irg);
-       else if (op == op_End)
+               break;
+
+       case iro_End:
                nn = get_irg_end(irg);
-       else if (op == op_Proj) {
-               old_irg = get_irn_irg(n);
+               break;
 
+       case iro_Proj:
+               old_irg = get_irn_irg(n);
                if (n == get_irg_initial_exec(old_irg))
                        nn = get_irg_initial_exec(irg);
                else if (n == get_irg_frame(old_irg))
@@ -85,6 +104,7 @@ void copy_irn_to_irg(ir_node *n, ir_graph *irg)
                        nn = get_irg_initial_mem(irg);
                else if (n == get_irg_args(old_irg))
                        nn = get_irg_args(irg);
+               break;
        }
 
        if (nn) {
@@ -95,7 +115,7 @@ void copy_irn_to_irg(ir_node *n, ir_graph *irg)
        nn = new_ir_node(get_irn_dbg_info(n),
                         irg,
                         NULL,            /* no block yet, will be set later */
-                        op,
+                        get_irn_op(n),
                         get_irn_mode(n),
                         get_irn_arity(n),
                         get_irn_in(n) + 1);
@@ -107,12 +127,9 @@ void copy_irn_to_irg(ir_node *n, ir_graph *irg)
        copy_node_attr(irg, n, nn);
        set_irn_link(n, nn);
 
-       /* fix the irg for blocks */
-       if (is_Block(nn)) {
+       /* fix the irg for nodes containing a reference to it */
+       if (ir_has_irg_ref(nn)) {
                nn->attr.block.irg.irg = irg;
-
-               /* we cannot allow blocks WITHOUT macroblock input */
-               set_Block_MacroBlock(nn, get_Block_MacroBlock(n));
        }
 }
 
@@ -144,9 +161,6 @@ ir_node *irn_copy_into_irg(const ir_node *node, ir_graph *irg)
 
        /* copy the attributes */
        copy_node_attr(irg, node, res);
-       if (op == op_Block) {
-               set_Block_MacroBlock(res, get_Block_MacroBlock(node));
-       }
 
        /* duplicate dependency edges */
        n_deps = get_irn_deps(node);
@@ -172,19 +186,12 @@ void irn_rewire_inputs(ir_node *node)
 {
        ir_node *new_node;
        int      arity;
+       int      n_deps;
        int      i;
 
        new_node = get_new_node(node);
 
-       if (is_Block(node)) {
-               /* copy the macro block header */
-               ir_node *mbh = get_Block_MacroBlock(node);
-
-               /* get the macro block header */
-               ir_node *nmbh = get_new_node(mbh);
-               assert(nmbh != NULL);
-               set_Block_MacroBlock(new_node, nmbh);
-       } else {
+       if (!is_Block(node)) {
                ir_node *block     = get_nodes_block(node);
                ir_node *new_block = get_new_node(block);
                set_nodes_block(new_node, new_block);
@@ -197,15 +204,20 @@ void irn_rewire_inputs(ir_node *node)
                set_irn_n(new_node, i, new_in);
        }
 
+       n_deps = get_irn_deps(new_node);
+       for (i = 0; i < n_deps; ++i) {
+               ir_node *dep     = get_irn_dep(node, i);
+               ir_node *new_dep = get_new_node(dep);
+               set_irn_dep(new_node, i, new_dep);
+       }
+
        /* Now the new node is complete. We can add it to the hash table for CSE. */
        add_identities(new_node);
 }
 
 void firm_pset_dump(pset *set)
 {
-       void *obj;
-
-       foreach_pset(set, obj) {
+       foreach_pset(set, void, obj) {
                ir_fprintf(stderr, "%+F\n", obj);
        }
 }