X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fopt%2Fgvn_pre.c;h=0c5dba6f3b211968e0efa8b0f89ab33a6abf8912;hb=94e9283b212f0f10b460248de945576a0bb61703;hp=ec141db6d7d1f0e9aaa5bd3c03f85f91d5865728;hpb=800e4d37cd161f66232656944211a718ce007a4b;p=libfirm diff --git a/ir/opt/gvn_pre.c b/ir/opt/gvn_pre.c index ec141db6d..0c5dba6f3 100644 --- a/ir/opt/gvn_pre.c +++ b/ir/opt/gvn_pre.c @@ -75,7 +75,7 @@ typedef struct pre_env { struct obstack *obst; /**< The obstack to allocate on. */ ir_node *start_block; /**< The start block of the current graph. */ ir_node *end_block; /**< The end block of the current graph */ - block_info *list; /**< Links all block info entires for easier recovery. */ + block_info *list; /**< Links all block info entries for easier recovery. */ elim_pair *pairs; /**< A list of node pairs that must be eliminated. */ unsigned last_idx; /**< last node index of "old" nodes, all higher indexes are newly created once. */ char changes; /**< Non-zero, if calculation of Antic_in has changed. */ @@ -120,7 +120,7 @@ static ir_node *add(ir_node *e, ir_node *v) if (v_pred != pred) { /* must create a new value here */ - v = new_r_Proj(get_nodes_block(v_pred), v_pred, get_irn_mode(v), get_Proj_proj(v)); + v = new_r_Proj(v_pred, get_irn_mode(v), get_Proj_proj(v)); } } v = identify_remember(value_table, v); @@ -149,7 +149,8 @@ static ir_node *lookup(ir_node *e) * * @param block the block */ -static block_info *get_block_info(ir_node *block) { +static block_info *get_block_info(ir_node *block) +{ return get_irn_link(block); } /* get_block_info */ @@ -159,8 +160,9 @@ static block_info *get_block_info(ir_node *block) { * @param block the block * @param env the environment */ -static void alloc_blk_info(ir_node *block, pre_env *env) { - block_info *info = obstack_alloc(env->obst, sizeof(*info)); +static void alloc_blk_info(ir_node *block, pre_env *env) +{ + block_info *info = OALLOC(env->obst, block_info); set_irn_link(block, info); info->exp_gen = ir_valueset_new(16); @@ -179,7 +181,8 @@ static void alloc_blk_info(ir_node *block, pre_env *env) { * * @param n the node */ -static int is_nice_value(ir_node *n) { +static int is_nice_value(ir_node *n) +{ ir_mode *mode; while (is_Proj(n)) @@ -204,7 +207,8 @@ 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, char *txt, ir_node *block) +{ ir_valueset_iterator_t iter; ir_node *value, *expr; int i; @@ -231,7 +235,8 @@ static void dump_value_set(ir_valueset_t *set, char *txt, ir_node *block) { * 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) { +static void topo_walker(ir_node *irn, void *ctx) +{ pre_env *env = ctx; ir_node *block; block_info *info; @@ -311,7 +316,8 @@ static void compute_avail_top_down(ir_node *block, void *ctx) * @param block the block * @param set a value set, containing the already processed predecessors */ -static int is_clean_in_block(ir_node *n, ir_node *block, ir_valueset_t *set) { +static int is_clean_in_block(ir_node *n, ir_node *block, ir_valueset_t *set) +{ int i; if (is_Phi(n)) @@ -395,7 +401,7 @@ static ir_node *phi_translate(ir_node *node, ir_node *block, int pos, ir_valuese get_irn_in(node)); /* We need the attribute copy here, because the Hash value of a node might depend on that. */ - copy_node_attr(node, nn); + copy_node_attr(current_ir_graph, node, nn); set_nodes_block(nn, get_nodes_block(node)); for (i = 0; i < arity; ++i) { @@ -423,7 +429,8 @@ static ir_node *phi_translate(ir_node *node, ir_node *block, int pos, ir_valuese * @param block the block * @param ctx the walker environment */ -static void compute_antic(ir_node *block, void *ctx) { +static void compute_antic(ir_node *block, void *ctx) +{ pre_env *env = ctx; block_info *succ_info; block_info *info = get_block_info(block); @@ -653,7 +660,7 @@ static void insert_nodes(ir_node *block, void *ctx) mode, get_irn_arity(pred), get_irn_in(pred) + 1); - copy_node_attr(pred, nn); + copy_node_attr(current_ir_graph, pred, nn); DB((dbg, LEVEL_1, "New node %+F in block %+F created\n", nn, pred_blk)); proj_pred = nn; @@ -666,7 +673,7 @@ static void insert_nodes(ir_node *block, void *ctx) mode, get_irn_arity(e_prime), get_irn_in(e_prime) + 1); - copy_node_attr(e_prime, nn); + copy_node_attr(current_ir_graph, e_prime, nn); if (proj_pred != NULL) { set_Proj_pred(nn, proj_pred); } @@ -707,7 +714,8 @@ static void insert_nodes(ir_node *block, void *ctx) * @param irn the node * @param ctx the walker environment */ -static void eliminate(ir_node *irn, void *ctx) { +static void eliminate(ir_node *irn, void *ctx) +{ pre_env *env = ctx; if (is_no_Block(irn)) { @@ -719,7 +727,7 @@ static void eliminate(ir_node *irn, void *ctx) { ir_node *expr = ir_valueset_lookup(bl->avail_out, value); if (expr != NULL && expr != irn) { - elim_pair *p = obstack_alloc(env->obst, sizeof(*p)); + elim_pair *p = OALLOC(env->obst, elim_pair); p->old_node = irn; p->new_node = expr; @@ -737,7 +745,8 @@ static void eliminate(ir_node *irn, void *ctx) { * * @param pairs list of elimination pairs */ -static void eliminate_nodes(elim_pair *pairs) { +static void eliminate_nodes(elim_pair *pairs) +{ elim_pair *p; for (p = pairs; p != NULL; p = p->next) { @@ -780,7 +789,7 @@ static void eliminate_nodes(elim_pair *pairs) { * references the origin. These nodes are translated again and again... * * The current fix is to use post-dominance. This simple ignores - * endless loops, ie we cannot optimize them. + * endless loops, i.e. we cannot optimize them. */ void do_gvn_pre(ir_graph *irg) {