From 7d793e369d9247bc0f839be7e7516075dea525be Mon Sep 17 00:00:00 2001 From: Jeff Law Date: Mon, 31 Jan 2005 22:28:23 -0700 Subject: [PATCH] tree-into-ssa.c (mark_def_sites_global_data): Make KILLS bitmap a sparse bitmap instead of a simple bitmap. * tree-into-ssa.c (mark_def_sites_global_data): Make KILLS bitmap a sparse bitmap instead of a simple bitmap. (mark_def_sites_initialize_block): Corresponding changes. (ssa_mark_def_sites_initialize_block): Likewise. (ssa_mark_phi_uses): Likewise. (mark_def_site, ssa_mark_def_sites): Likewise. (mark_def_site_blocks): Likewise. (rewrite_ssa_into_ssa): Likewise. From-SVN: r94519 --- gcc/ChangeLog | 9 +++++++++ gcc/tree-into-ssa.c | 36 ++++++++++++++++++------------------ 2 files changed, 27 insertions(+), 18 deletions(-) diff --git a/gcc/ChangeLog b/gcc/ChangeLog index ceaeae3122a..a67eb7f91c4 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,5 +1,14 @@ 2005-01-31 Jeff Law + * tree-into-ssa.c (mark_def_sites_global_data): Make KILLS + bitmap a sparse bitmap instead of a simple bitmap. + (mark_def_sites_initialize_block): Corresponding changes. + (ssa_mark_def_sites_initialize_block): Likewise. + (ssa_mark_phi_uses): Likewise. + (mark_def_site, ssa_mark_def_sites): Likewise. + (mark_def_site_blocks): Likewise. + (rewrite_ssa_into_ssa): Likewise. + * tree-ssa-dom.c (record_cond): Pass correct variable type for last argument to htab_find_slot_with_hash. diff --git a/gcc/tree-into-ssa.c b/gcc/tree-into-ssa.c index 778157ac2bf..c6124e24a16 100644 --- a/gcc/tree-into-ssa.c +++ b/gcc/tree-into-ssa.c @@ -121,7 +121,7 @@ struct mark_def_sites_global_data are used in a basic block. We keep it as a global variable solely to avoid the overhead of allocating and deallocating the bitmap. */ - sbitmap kills; + bitmap kills; /* Bitmap of names to rename. */ sbitmap names_to_rename; @@ -288,9 +288,9 @@ mark_def_sites_initialize_block (struct dom_walk_data *walk_data, basic_block bb ATTRIBUTE_UNUSED) { struct mark_def_sites_global_data *gd = walk_data->global_data; - sbitmap kills = gd->kills; + bitmap kills = gd->kills; - sbitmap_zero (kills); + bitmap_clear (kills); } /* Block initialization routine for mark_def_sites. Clear the @@ -301,11 +301,11 @@ ssa_mark_def_sites_initialize_block (struct dom_walk_data *walk_data, basic_block bb) { struct mark_def_sites_global_data *gd = walk_data->global_data; - sbitmap kills = gd->kills; + bitmap kills = gd->kills; tree phi, def; unsigned def_uid; - sbitmap_zero (kills); + bitmap_clear (kills); for (phi = phi_nodes (bb); phi; phi = PHI_CHAIN (phi)) { @@ -316,7 +316,7 @@ ssa_mark_def_sites_initialize_block (struct dom_walk_data *walk_data, continue; set_def_block (def, bb, true, true); - SET_BIT (kills, def_uid); + bitmap_set_bit (kills, def_uid); } } @@ -326,7 +326,7 @@ static void ssa_mark_phi_uses (struct dom_walk_data *walk_data, basic_block bb) { struct mark_def_sites_global_data *gd = walk_data->global_data; - sbitmap kills = gd->kills; + bitmap kills = gd->kills; edge e; tree phi, use; unsigned uid; @@ -346,7 +346,7 @@ ssa_mark_phi_uses (struct dom_walk_data *walk_data, basic_block bb) uid = SSA_NAME_VERSION (use); if (TEST_BIT (gd->names_to_rename, uid) - && !TEST_BIT (kills, uid)) + && !bitmap_bit_p (kills, uid)) set_livein_block (use, bb); } } @@ -373,7 +373,7 @@ mark_def_sites (struct dom_walk_data *walk_data, block_stmt_iterator bsi) { struct mark_def_sites_global_data *gd = walk_data->global_data; - sbitmap kills = gd->kills; + bitmap kills = gd->kills; size_t uid; tree stmt, def; use_operand_p use_p; @@ -396,7 +396,7 @@ mark_def_sites (struct dom_walk_data *walk_data, if (prepare_use_operand_for_rename (use_p, &uid)) { REWRITE_THIS_STMT (stmt) = 1; - if (!TEST_BIT (kills, uid)) + if (!bitmap_bit_p (kills, uid)) set_livein_block (USE_FROM_PTR (use_p), bb); } } @@ -427,7 +427,7 @@ mark_def_sites (struct dom_walk_data *walk_data, if (prepare_def_operand_for_rename (def, &uid)) { set_def_block (def, bb, false, false); - SET_BIT (kills, uid); + bitmap_set_bit (kills, uid); REWRITE_THIS_STMT (stmt) = 1; } } @@ -442,7 +442,7 @@ ssa_mark_def_sites (struct dom_walk_data *walk_data, block_stmt_iterator bsi) { struct mark_def_sites_global_data *gd = walk_data->global_data; - sbitmap kills = gd->kills; + bitmap kills = gd->kills; size_t uid, def_uid; tree stmt, use, def; ssa_op_iter iter; @@ -459,7 +459,7 @@ ssa_mark_def_sites (struct dom_walk_data *walk_data, uid = SSA_NAME_VERSION (use); if (TEST_BIT (gd->names_to_rename, uid) - && !TEST_BIT (kills, uid)) + && !bitmap_bit_p (kills, uid)) set_livein_block (use, bb); } @@ -472,7 +472,7 @@ ssa_mark_def_sites (struct dom_walk_data *walk_data, if (TEST_BIT (gd->names_to_rename, def_uid)) { set_def_block (def, bb, false, true); - SET_BIT (kills, def_uid); + bitmap_set_bit (kills, def_uid); } } } @@ -1521,7 +1521,7 @@ mark_def_site_blocks (void) /* Notice that this bitmap is indexed using variable UIDs, so it must be large enough to accommodate all the variables referenced in the function, not just the ones we are renaming. */ - mark_def_sites_global_data.kills = sbitmap_alloc (num_referenced_vars); + mark_def_sites_global_data.kills = BITMAP_XMALLOC (); walk_data.global_data = &mark_def_sites_global_data; /* We do not have any local data. */ @@ -1537,7 +1537,7 @@ mark_def_site_blocks (void) fini_walk_dominator_tree (&walk_data); /* We no longer need this bitmap, clear and free it. */ - sbitmap_free (mark_def_sites_global_data.kills); + BITMAP_XFREE (mark_def_sites_global_data.kills); } @@ -1698,7 +1698,7 @@ rewrite_ssa_into_ssa (void) set_current_def (ssa_name (i), NULL_TREE); } - mark_def_sites_global_data.kills = sbitmap_alloc (num_ssa_names); + mark_def_sites_global_data.kills = BITMAP_XMALLOC (); mark_def_sites_global_data.names_to_rename = snames_to_rename; walk_data.global_data = &mark_def_sites_global_data; @@ -1717,7 +1717,7 @@ rewrite_ssa_into_ssa (void) fini_walk_dominator_tree (&walk_data); /* We no longer need this bitmap, clear and free it. */ - sbitmap_free (mark_def_sites_global_data.kills); + BITMAP_XFREE (mark_def_sites_global_data.kills); /* Insert PHI nodes at dominance frontiers of definition blocks. */ insert_phi_nodes (dfs, to_rename); -- 2.30.2