diff options
author | rakdver <rakdver@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-09-26 19:53:13 +0000 |
---|---|---|
committer | rakdver <rakdver@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-09-26 19:53:13 +0000 |
commit | 0cc4271a0f43fa0d3e4b3b728a3c103d39e305cd (patch) | |
tree | 5a3c9bcba3d78b6ee1c1f3cb79e280b227446aa2 /gcc/ra-rewrite.c | |
parent | 321c1598d3c14de50c9ff1966da91b4003fbf719 (diff) | |
download | gcc-0cc4271a0f43fa0d3e4b3b728a3c103d39e305cd.tar.gz |
* bitmap.h (EXECUTE_IF_SET_IN_BITMAP, EXECUTE_IF_AND_COMPL_IN_BITMAP,
EXECUTE_IF_AND_IN_BITMAP): Changed to iterator style.
(bitmap_iterator): New type.
(bmp_iter_common_next_1, bmp_iter_single_next_1, bmp_iter_single_init,
bmp_iter_end_p, bmp_iter_single_next, bmp_iter_and_not_next_1,
bmp_iter_and_not_init, bmp_iter_and_not_next, bmp_iter_and_next_1,
bmp_iter_and_init, bmp_iter_and_next): New functions.
* basic-block.h (EXECUTE_IF_SET_IN_REG_SET,
EXECUTE_IF_AND_COMPL_IN_REG_SET, EXECUTE_IF_AND_IN_REG_SET): Changed to
use iterator-style EXECUTE_IF_IN_BITMAP macros.
* bitmap.c (bitmap_print): Ditto.
* bt-load.c (clear_btr_from_live_range, add_btr_to_live_range,
btr_def_live_range): Ditto.
* cfganal.c (compute_dominance_frontiers_1) Ditto.
* cgraphunit.c (convert_UIDs_in_bitmap, cgraph_characterize_statics):
Ditto.
* ddg.c (build_inter_loop_deps): Ditto.
* df.c (FOR_EACH_BB_IN_BITMAP, df_bb_reg_info_compute, df_refs_update):
Ditto.
* except.c (remove_eh_handler): Ditto.
* flow.c (reg_set_to_hard_reg_set): Ditto.
* gcse.c (clear_modify_mem_tables): Ditto.
* global.c (build_insn_chain): Ditto.
* ifcvt.c (dead_or_predicable): Ditto.
* loop-invariant.c (get_inv_cost, set_move_mark, move_invariant_reg):
Ditto.
* ra-build.c (livethrough_conflicts_bb, conflicts_between_webs): Ditto.
* ra-rewrite.c (reloads_to_loads, rewrite_program2,
detect_web_parts_to_rebuild, delete_useless_defs, actual_spill): Ditto.
* tree-cfg.c (allocate_ssa_names, tree_duplicate_sese_region,
tree_purge_all_dead_eh_edges): Ditto.
* tree-into-ssa.c (compute_global_livein, insert_phi_nodes,
insert_phi_nodes_for, debug_def_blocks_r, invalidate_name_tags,
rewrite_ssa_into_ssa): Ditto.
* tree-outof-ssa.c (find_replaceable_exprs): Ditto.
* tree-sra.c (scan_function, decide_instantiations, scalarize_parms):
Ditto.
* tree-ssa-alias.c (init_alias_info, compute_points_to_and_addr_escape,
compute_flow_sensitive_aliasing, maybe_create_global_var,
dump_points_to_info_for): Ditto.
* tree-ssa-dce.c (EXECUTE_IF_CONTROL_DEPENDENT): Ditto.
* tree-ssa-dse.c (dse_finalize_block): Ditto.
* tree-ssa-live.c (live_worklist, calculate_live_on_entry,
calculate_live_on_exit, build_tree_conflict_graph, dump_live_info):
Ditto.
* tree-ssa-loop-ivopts.c (find_induction_variables,
find_interesting_uses, add_old_ivs_candidates, alloc_use_cost_map,
determine_use_iv_costs, determine_set_costs, find_best_candidate,
set_cost_up_to, create_new_ivs, remove_unused_ivs, free_loop_data):
Ditto.
* tree-ssa-loop-manip.c (add_exit_phis_var, add_exit_phis): Ditto.
* tree-ssa-operands.c (get_asm_expr_operands, add_call_clobber_ops,
add_call_read_ops): Ditto.
* tree-ssa-pre.c (bitmap_print_value_set, insert_aux): Ditto.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88145 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ra-rewrite.c')
-rw-r--r-- | gcc/ra-rewrite.c | 52 |
1 files changed, 34 insertions, 18 deletions
diff --git a/gcc/ra-rewrite.c b/gcc/ra-rewrite.c index adc39831686..23c26ba9c3f 100644 --- a/gcc/ra-rewrite.c +++ b/gcc/ra-rewrite.c @@ -1013,8 +1013,10 @@ reloads_to_loads (struct rewrite_info *ri, struct ref **refs, if (is_death) { int old_num_r = num_reloads; + bitmap_iterator bi; + bitmap_clear (ri->scratch); - EXECUTE_IF_SET_IN_BITMAP (ri->need_reload, 0, j, + EXECUTE_IF_SET_IN_BITMAP (ri->need_reload, 0, j, bi) { struct web *web2 = ID2WEB (j); struct web *aweb2 = alias (find_web_for_subweb (web2)); @@ -1030,7 +1032,7 @@ reloads_to_loads (struct rewrite_info *ri, struct ref **refs, bitmap_set_bit (ri->scratch, j); num_reloads--; } - }); + } if (num_reloads != old_num_r) bitmap_operation (ri->need_reload, ri->need_reload, ri->scratch, BITMAP_AND_COMPL); @@ -1062,6 +1064,8 @@ rewrite_program2 (bitmap new_deaths) basic_block last_bb = NULL; rtx last_block_insn; int i, j; + bitmap_iterator bi; + if (!INSN_P (insn)) insn = prev_real_insn (insn); while (insn && !(bb = BLOCK_FOR_INSN (insn))) @@ -1073,7 +1077,7 @@ rewrite_program2 (bitmap new_deaths) sbitmap_zero (ri.live); CLEAR_HARD_REG_SET (ri.colors_in_use); - EXECUTE_IF_SET_IN_BITMAP (live_at_end[i - 2], 0, j, + EXECUTE_IF_SET_IN_BITMAP (live_at_end[i - 2], 0, j, bi) { struct web *web = use2web[j]; struct web *aweb = alias (find_web_for_subweb (web)); @@ -1090,7 +1094,7 @@ rewrite_program2 (bitmap new_deaths) if (aweb->type != SPILLED) update_spill_colors (&(ri.colors_in_use), web, 1); } - }); + } bitmap_clear (ri.need_reload); ri.num_reloads = 0; @@ -1130,7 +1134,9 @@ rewrite_program2 (bitmap new_deaths) if (INSN_P (insn) && BLOCK_FOR_INSN (insn) != last_bb) { int index = BLOCK_FOR_INSN (insn)->index + 2; - EXECUTE_IF_SET_IN_BITMAP (live_at_end[index - 2], 0, j, + bitmap_iterator bi; + + EXECUTE_IF_SET_IN_BITMAP (live_at_end[index - 2], 0, j, bi) { struct web *web = use2web[j]; struct web *aweb = alias (find_web_for_subweb (web)); @@ -1139,9 +1145,9 @@ rewrite_program2 (bitmap new_deaths) SET_BIT (ri.live, web->id); update_spill_colors (&(ri.colors_in_use), web, 1); } - }); + } bitmap_clear (ri.scratch); - EXECUTE_IF_SET_IN_BITMAP (ri.need_reload, 0, j, + EXECUTE_IF_SET_IN_BITMAP (ri.need_reload, 0, j, bi) { struct web *web2 = ID2WEB (j); struct web *supweb2 = find_web_for_subweb (web2); @@ -1156,7 +1162,7 @@ rewrite_program2 (bitmap new_deaths) bitmap_set_bit (ri.scratch, j); ri.num_reloads--; } - }); + } bitmap_operation (ri.need_reload, ri.need_reload, ri.scratch, BITMAP_AND_COMPL); last_bb = BLOCK_FOR_INSN (insn); @@ -1344,26 +1350,28 @@ rewrite_program2 (bitmap new_deaths) int in_ir = 0; edge e; int num = 0; + bitmap_iterator bi; + HARD_REG_SET cum_colors, colors; CLEAR_HARD_REG_SET (cum_colors); for (e = bb->pred; e && num < 5; e = e->pred_next, num++) { int j; CLEAR_HARD_REG_SET (colors); - EXECUTE_IF_SET_IN_BITMAP (live_at_end[e->src->index], 0, j, + EXECUTE_IF_SET_IN_BITMAP (live_at_end[e->src->index], 0, j, bi) { struct web *web = use2web[j]; struct web *aweb = alias (find_web_for_subweb (web)); if (aweb->type != SPILLED) update_spill_colors (&colors, web, 1); - }); + } IOR_HARD_REG_SET (cum_colors, colors); } if (num == 5) in_ir = 1; bitmap_clear (ri.scratch); - EXECUTE_IF_SET_IN_BITMAP (ri.need_reload, 0, j, + EXECUTE_IF_SET_IN_BITMAP (ri.need_reload, 0, j, bi) { struct web *web2 = ID2WEB (j); struct web *supweb2 = find_web_for_subweb (web2); @@ -1384,7 +1392,7 @@ rewrite_program2 (bitmap new_deaths) bitmap_set_bit (ri.scratch, j); ri.num_reloads--; } - }); + } bitmap_operation (ri.need_reload, ri.need_reload, ri.scratch, BITMAP_AND_COMPL); } @@ -1458,6 +1466,8 @@ detect_web_parts_to_rebuild (void) struct web *web = DLIST_WEB (d); struct conflict_link *wl; unsigned int j; + bitmap_iterator bi; + /* This check is only needed for coalesced nodes, but hey. */ if (alias (web)->type != SPILLED) continue; @@ -1494,14 +1504,14 @@ detect_web_parts_to_rebuild (void) SET_BIT (already_webs, wl->t->id); mark_refs_for_checking (wl->t, uses_as_bitmap); } - EXECUTE_IF_SET_IN_BITMAP (web->useless_conflicts, 0, j, + EXECUTE_IF_SET_IN_BITMAP (web->useless_conflicts, 0, j, bi) { struct web *web2 = ID2WEB (j); if (TEST_BIT (already_webs, web2->id)) continue; SET_BIT (already_webs, web2->id); mark_refs_for_checking (web2, uses_as_bitmap); - }); + } } /* We also recheck unconditionally all uses of any hardregs. This means @@ -1550,10 +1560,12 @@ static void delete_useless_defs (void) { unsigned int i; + bitmap_iterator bi; + /* If the insn only sets the def without any sideeffect (besides clobbers or uses), we can delete it. single_set() also tests for INSN_P(insn). */ - EXECUTE_IF_SET_IN_BITMAP (useless_defs, 0, i, + EXECUTE_IF_SET_IN_BITMAP (useless_defs, 0, i, bi) { rtx insn = DF_REF_INSN (df->defs[i]); rtx set = single_set (insn); @@ -1566,7 +1578,7 @@ delete_useless_defs (void) NOTE_LINE_NUMBER (insn) = NOTE_INSN_DELETED; df_insn_modify (df, BLOCK_FOR_INSN (insn), insn); } - }); + } } /* Look for spilled webs, on whose behalf no insns were emitted. @@ -1617,7 +1629,9 @@ void actual_spill (void) { int i; + bitmap_iterator bi; bitmap new_deaths = BITMAP_XMALLOC (); + reset_changed_flag (); spill_coalprop (); choose_spill_colors (); @@ -1633,8 +1647,10 @@ actual_spill (void) insns_with_deaths = sbitmap_alloc (get_max_uid ()); death_insns_max_uid = get_max_uid (); sbitmap_zero (insns_with_deaths); - EXECUTE_IF_SET_IN_BITMAP (new_deaths, 0, i, - { SET_BIT (insns_with_deaths, i);}); + EXECUTE_IF_SET_IN_BITMAP (new_deaths, 0, i, bi) + { + SET_BIT (insns_with_deaths, i); + } detect_non_changed_webs (); detect_web_parts_to_rebuild (); BITMAP_XFREE (new_deaths); |