X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2Fbeutil.c;h=fe26121b8eeb33a85ac6bf7eab1796d67162fbd6;hb=e7ba741cdd9599ce05d7989bff60a1c6137ee0b5;hp=ee4506ce8a926851c4f5c5d7a218506959d215d5;hpb=d1de7107f847963fbce099597e6c42c2371b053c;p=libfirm diff --git a/ir/be/beutil.c b/ir/be/beutil.c index ee4506ce8..fe26121b8 100644 --- a/ir/be/beutil.c +++ b/ir/be/beutil.c @@ -128,6 +128,10 @@ void dump_allocated_irg(arch_env_t *arch_env, ir_graph *irg, char *suffix) */ static int sched_edge_hook(FILE *F, ir_node *irn) { +#ifndef SCHEDULE_PROJS + if (is_Proj(irn)) + return 1; +#endif if(sched_is_scheduled(irn) && sched_has_prev(irn)) { ir_node *prev = sched_prev(irn); fprintf(F, "edge:{sourcename:\""); @@ -182,16 +186,19 @@ void be_dump(ir_graph *irg, const char *suffix, void (*dumper)(ir_graph *, const static void collect_phis(ir_node *irn, void *data) { - if(is_Phi(irn)) { - ir_node *bl = get_nodes_block(irn); - set_irn_link(irn, get_irn_link(bl)); - set_irn_link(bl, irn); - } + (void) data; + if(is_Phi(irn)) { + ir_node *bl = get_nodes_block(irn); + set_irn_link(irn, get_irn_link(bl)); + set_irn_link(bl, irn); + } } void be_clear_links(ir_graph *irg) { + set_using_irn_link(irg); irg_walk_graph(irg, firm_clear_link, NULL, NULL); + clear_using_irn_link(irg); } void be_collect_phis(ir_graph *irg) @@ -199,9 +206,11 @@ void be_collect_phis(ir_graph *irg) irg_walk_graph(irg, collect_phis, NULL, NULL); } -static void count_num_reachable_nodes(ir_node *irn, void *env) { +static void count_num_reachable_nodes(ir_node *irn, void *env) +{ int *num = env; (*num)++; + (void) irn; } unsigned get_num_reachable_nodes(ir_graph *irg) { @@ -232,26 +241,6 @@ void be_kill_node(ir_node *irn) { edges_node_deleted(irn, irg); } -/* FIXME: not used. can be deleted? */ -ir_node *dom_up_search(pset *accept, ir_node *start_point_exclusive) { - ir_node *irn, *idom; - - /* search the current block */ - for (irn=sched_prev(start_point_exclusive); irn; irn=sched_prev(irn)) - if (pset_find_ptr(accept, irn)) - return irn; - - /* FIXME: This is obviously buggy: after the first recursive call idom is a block - and get_nodes_block will fail. - Moreover, why not a simple iteration instead of recursion */ - idom = get_Block_idom(get_nodes_block(start_point_exclusive)); - - if (idom) - return dom_up_search(accept, idom); /* continue search in idom-block */ - else - return NULL; /* this was the start block and we did not find an acceptable irn */ -} - /** * Gets the Proj with number pn from irn. */