X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2Fbespill.c;h=964c8a38cd603deb590eca87362a22bb381bc5ff;hb=4d7a9507baf1737297cd4f7fc91eab209fd5d398;hp=1434ff258cc56295867797f625903889e2c89267;hpb=28ccae9321ada1753f30bbd16cd001e24615b134;p=libfirm diff --git a/ir/be/bespill.c b/ir/be/bespill.c index 1434ff258..964c8a38c 100644 --- a/ir/be/bespill.c +++ b/ir/be/bespill.c @@ -107,7 +107,7 @@ static ir_node *be_spill_irn(spill_env_t *senv, ir_node *irn, ir_node *ctx_irn) ctx = be_get_spill_ctx(senv->spill_ctxs, irn, ctx_irn); if(!ctx->spill) { - const be_main_env_t *env = senv->chordal_env->main_env; + const be_main_env_t *env = senv->chordal_env->birg->main_env; ctx->spill = be_spill(env->arch_env, irn, ctx_irn); } @@ -169,7 +169,7 @@ static ir_node *be_spill_node(spill_env_t *senv, ir_node *to_spill) { static void phi_walker(ir_node *irn, void *env) { spill_env_t *senv = env; - const arch_env_t *arch = senv->chordal_env->main_env->arch_env; + const arch_env_t *arch = senv->chordal_env->birg->main_env->arch_env; if (is_Phi(irn) && arch_irn_has_reg_class(arch, irn, 0, senv->cls) && senv->is_mem_phi(irn, senv->data)) { @@ -179,7 +179,8 @@ static void phi_walker(ir_node *irn, void *env) { } void be_insert_spills_reloads(spill_env_t *senv, pset *reload_set) { - ir_graph *irg = senv->chordal_env->irg; + const arch_env_t *aenv = senv->chordal_env->birg->main_env->arch_env; + ir_graph *irg = senv->chordal_env->irg; ir_node *irn; spill_info_t *si; struct obstack ob; @@ -221,22 +222,21 @@ void be_insert_spills_reloads(spill_env_t *senv, pset *reload_set) { ir_node *spill = be_spill_node(senv, si->spilled_node); /* the reload */ - ir_node *bl = is_Block(rld->reloader) ? rld->reloader : get_nodes_block(rld->reloader); - ir_node *reload = be_new_Reload(senv->cls, irg, bl, mode, spill); + ir_node *reload = be_reload(aenv, senv->cls, rld->reloader, mode, spill); DBG((senv->dbg, LEVEL_1, " %+F of %+F before %+F\n", reload, si->spilled_node, rld->reloader)); if(reload_set) pset_insert_ptr(reload_set, reload); - /* remember the reaload */ + /* remember the reload */ obstack_ptr_grow(&ob, reload); - sched_add_before(rld->reloader, reload); n_reloads++; } assert(n_reloads > 0); + obstack_ptr_grow(&ob, si->spilled_node); reloads = obstack_finish(&ob); - be_ssa_constr_single_ignore(senv->chordal_env->dom_front, si->spilled_node, n_reloads, reloads, senv->mem_phis); + be_ssa_constr_ignore(senv->chordal_env->dom_front, n_reloads + 1, reloads, senv->mem_phis); obstack_free(&ob, reloads); } @@ -312,7 +312,7 @@ static void compute_spill_slots_walker(ir_node *spill, void *env) { /* this is a new spill context */ ss = obstack_alloc(&ssenv->ob, sizeof(*ss)); ss->members = pset_new_ptr(8); - ss->largest_mode = get_irn_mode(get_irn_n(spill, 0)); + ss->largest_mode = get_irn_mode(get_irn_n(spill, be_pos_Spill_val)); ss->size = get_mode_size_bytes(ss->largest_mode); ss->align = ss->size; /* TODO Assumed for now */ pmap_insert(ssenv->slots, ctx, ss); @@ -320,7 +320,7 @@ static void compute_spill_slots_walker(ir_node *spill, void *env) { ir_node *irn; /* values with the same spill_ctx must go into the same spill slot */ ss = entry->value; - assert(ss->size == (unsigned)get_mode_size_bytes(get_irn_mode(get_irn_n(spill, 0))) && "Different sizes for the same spill slot are not allowed yet."); + assert(ss->size == (unsigned)get_mode_size_bytes(get_irn_mode(get_irn_n(spill, be_pos_Spill_val))) && "Different sizes for the same spill slot are not allowed yet."); for (irn = pset_first(ss->members); irn; irn = pset_next(ss->members)) { /* use values_interfere here, because it uses the dominance check, which does work for values in memory */ @@ -483,7 +483,7 @@ void be_compute_spill_offsets(be_chordal_env_t *cenv) { obstack_init(&ssenv.ob); ssenv.cenv = cenv; ssenv.slots = pmap_create(); - ssenv.types = pmap_create(); + ssenv.types = pmap_create(); ssenv.dbg = firm_dbg_register("ir.be.spillslots"); /* Get initial spill slots */ @@ -499,8 +499,10 @@ void be_compute_spill_offsets(be_chordal_env_t *cenv) { /* Clean up */ pmap_foreach(ssenv.slots, pme) - del_pset(((spill_slot_t *)pme->value)->members); + del_pset(((spill_slot_t *)pme->value)->members); pmap_destroy(ssenv.slots); - pmap_destroy(ssenv.types); + pmap_destroy(ssenv.types); obstack_free(&ssenv.ob, NULL); + + be_copy_entities_to_reloads(cenv->irg); }