X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fopt%2Fdata_flow_scalar_replace.c;h=2b535e42c871a7392d249fbe657a06da4f5e2b45;hb=1268a295e95b532b46e2aed04505d5206181afda;hp=ca0e2fa21113e9010ff912bb606c73b38a9e5495;hpb=d935aa267d00966c360931d2f0f43008030c0592;p=libfirm diff --git a/ir/opt/data_flow_scalar_replace.c b/ir/opt/data_flow_scalar_replace.c index ca0e2fa21..2b535e42c 100644 --- a/ir/opt/data_flow_scalar_replace.c +++ b/ir/opt/data_flow_scalar_replace.c @@ -23,9 +23,7 @@ * @author Beyhan Veliev, Michael Beck * @version $Id$ */ -#ifdef HAVE_CONFIG_H #include "config.h" -#endif #include "iroptimize.h" @@ -341,6 +339,7 @@ static void *ADDRESS_TAKEN = &_x; static int find_possible_replacements(ir_graph *irg) { ir_node *irg_frame = get_irg_frame(irg); + ir_type *frame_tp; int i, n; int res = 0; @@ -349,19 +348,12 @@ static int find_possible_replacements(ir_graph *irg) n = get_irn_n_outs(irg_frame); /* - * First, clear the link field of all interestingentities. - * Note that we did not rely on the fact that there is only - * one Sel node per entity, so we might access one entity - * more than once here. - * That's why we have need two loops. + * First, clear the link field of all interesting entities. */ - for (i = 0; i < n; ++i) { - ir_node *succ = get_irn_out(irg_frame, i); - - if (is_Sel(succ)) { - ir_entity *ent = get_Sel_entity(succ); - set_entity_link(ent, NULL); - } + frame_tp = get_irg_frame_type(irg); + for (i = get_class_n_members(frame_tp) - 1; i >= 0; --i) { + ir_entity *ent = get_class_member(frame_tp, i); + set_entity_link(ent, NULL); } /* @@ -376,7 +368,12 @@ static int find_possible_replacements(ir_graph *irg) ir_entity *ent = get_Sel_entity(succ); ir_type *ent_type; - if (get_entity_link(ent) == ADDRESS_TAKEN) + /* we are only interested in entities on the frame, NOT + on the value type */ + if (get_entity_owner(ent) != frame_tp) + continue; + + if (get_entity_link(ent) == ADDRESS_TAKEN) continue; /* @@ -759,9 +756,8 @@ static void split_phi_mem_edge(ir_node *irn, env_t *env) { irn_blk = get_nodes_block(irn); val_arr = get_irn_link(irn_blk); - n = get_Block_n_cfgpreds(irn_blk); - - in = alloca(sizeof(*in) * n); + n = get_Block_n_cfgpreds(irn_blk); + in = ALLOCAN(ir_node*, n); for(value_ent = set_first(env->set_ent); value_ent; value_ent = set_next(env->set_ent)) if(val_arr[GET_ENT_VNUM(value_ent->ent)].access_type < 3)