X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;ds=sidebyside;f=ir%2Fopt%2Fopt_frame.c;h=c28abd8f12b794ff85bf2c5643a4aa0d015f9fb6;hb=4de03dcc6a6b5cff24c69afeeb2698c4a4506b19;hp=9aed1e296ba1dec627deff025513ed197d9f3f17;hpb=4b363c6a4e0584ce755b5f82fc3d7a9dc38658b2;p=libfirm diff --git a/ir/opt/opt_frame.c b/ir/opt/opt_frame.c index 9aed1e296..c28abd8f1 100644 --- a/ir/opt/opt_frame.c +++ b/ir/opt/opt_frame.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. * @@ -22,8 +22,7 @@ * @brief Optimize the frame type. * @date 15.03.2006 * @author Michael Beck - * @version $Id$ - * @summary + * @brief * Optimize the frame type by removing unused type members. */ #include "config.h" @@ -39,20 +38,21 @@ * Optimize the frame type of an irg by removing * never touched entities. */ -void opt_frame_irg(ir_graph *irg) { +void opt_frame_irg(ir_graph *irg) +{ ir_type *frame_tp = get_irg_frame_type(irg); ir_entity *ent, *list; ir_node *frame, *sel; - int i, n = get_class_n_members(frame_tp); + size_t i, n = get_class_n_members(frame_tp); if (n <= 0) return; - irp_reserve_resources(irp, IR_RESOURCE_ENTITY_LINK); + irp_reserve_resources(irp, IRP_RESOURCE_ENTITY_LINK); /* clear all entity links */ - for (i = n - 1; i >= 0; --i) { - ent = get_class_member(frame_tp, i); + for (i = n; i > 0;) { + ent = get_class_member(frame_tp, --i); set_entity_link(ent, NULL); } @@ -71,6 +71,8 @@ void opt_frame_irg(ir_graph *irg) { } } } else { + int i; + /* use traditionally out edges */ assure_irg_outs(irg); @@ -88,8 +90,8 @@ void opt_frame_irg(ir_graph *irg) { /* link unused ones */ list = NULL; - for (i = n - 1; i >= 0; --i) { - ent = get_class_member(frame_tp, i); + for (i = n; i > 0;) { + ent = get_class_member(frame_tp, --i); /* beware of inner functions: those are NOT unused */ if (get_entity_link(ent) == NULL && !is_method_entity(ent)) { set_entity_link(ent, list); @@ -100,13 +102,13 @@ void opt_frame_irg(ir_graph *irg) { if (list != NULL) { /* delete list members */ for (ent = list; ent; ent = list) { - list = get_entity_link(ent); - remove_class_member(frame_tp, ent); + list = (ir_entity*)get_entity_link(ent); + free_entity(ent); } - /* we changed the frame type, it's layout should be redefined */ + /* we changed the frame type, its layout should be redefined */ set_type_state(frame_tp, layout_undefined); } - irp_free_resources(irp, IR_RESOURCE_ENTITY_LINK); + irp_free_resources(irp, IRP_RESOURCE_ENTITY_LINK); } ir_graph_pass_t *opt_frame_irg_pass(const char *name)