X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fopt%2Fircgopt.c;h=df3738eb8bbfa503d43c0406ba50717d5e4cb7c4;hb=8c9921a1fc166552f6e416434fd8394a4fc210a3;hp=ef4baf275047d847ffc921d5eeaf95a8d8d2ce1c;hpb=f164b24b962ffc75287122e131ecbbe1cbb8950b;p=libfirm diff --git a/ir/opt/ircgopt.c b/ir/opt/ircgopt.c index ef4baf275..df3738eb8 100644 --- a/ir/opt/ircgopt.c +++ b/ir/opt/ircgopt.c @@ -22,7 +22,6 @@ * @brief Removal of unreachable methods. * @author Hubert Schmid * @date 09.06.2002 - * @version $Id$ */ /* @@ -45,7 +44,7 @@ #include "irtools.h" #include "irpass.h" -DEBUG_ONLY(static firm_dbg_module_t *dbg); +DEBUG_ONLY(static firm_dbg_module_t *dbg;) /** * Walker: adds Call operations to a head's link list. @@ -64,7 +63,7 @@ static void collect_call(ir_node *node, void *env) void gc_irgs(size_t n_keep, ir_entity ** keep_arr) { void * MARK = &MARK; /* @@@ gefaehrlich!!! Aber wir markieren hoechstens zu viele ... */ - int i; + size_t i, n; FIRM_DBG_REGISTER(dbg, "firm.opt.cgopt"); @@ -86,8 +85,8 @@ void gc_irgs(size_t n_keep, ir_entity ** keep_arr) DB((dbg, LEVEL_1, " method %+F kept alive.\n", marked[idx])); } - for (i = 0; i < ARR_LEN(marked); ++i) { - ir_graph *irg = get_entity_irg(marked[i]); + for (idx = 0; idx < ARR_LEN(marked); ++idx) { + ir_graph *irg = get_entity_irg(marked[idx]); ir_node *node; if (irg == NULL) @@ -102,11 +101,11 @@ void gc_irgs(size_t n_keep, ir_entity ** keep_arr) /* iterate calls */ for (node = (ir_node*)get_irn_link(node); node != NULL; node = (ir_node*)get_irn_link(node)) { - int i; + size_t i; assert(is_Call(node)); - for (i = get_Call_n_callees(node) - 1; i >= 0; --i) { - ir_entity *ent = get_Call_callee(node, i); + for (i = get_Call_n_callees(node); i > 0;) { + ir_entity *ent = get_Call_callee(node, --i); if (get_entity_irg(ent) && get_entity_link(ent) != MARK) { set_entity_link(ent, MARK); @@ -123,7 +122,7 @@ void gc_irgs(size_t n_keep, ir_entity ** keep_arr) } /* clean */ - for (i = get_irp_n_irgs() - 1; i >= 0; --i) { + for (i = 0, n = get_irp_n_irgs(); i < n; ++i) { ir_graph *irg = get_irp_irg(i); ir_entity *ent = get_irg_entity(irg);