diff options
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ChangeLog | 12 | ||||
| -rw-r--r-- | gcc/basic-block.h | 5 | ||||
| -rw-r--r-- | gcc/cfgcleanup.c | 3 | ||||
| -rw-r--r-- | gcc/cselib.c | 12 | ||||
| -rw-r--r-- | gcc/toplev.c | 3 |
5 files changed, 31 insertions, 4 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 3abd95599f3..0e66702d875 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,15 @@ +2004-01-23 Jan Hubicka <jh@suse.cz> + + * basic-block.h (PROP_POSTRELOAD): New macro. + (CLEANUP_LOG_LINKS): New. + * cfgcleanup.c (cleanup_cfg): Only PROP_LOG_LINKS when asked to. + * toplev.c (rest_of_handle_life): Preserve LOG_LINKS trought cleanup_cfg. + + * cselib.c (value_pool): New. + (new_cselib_val): Use pool. + (cselib_init): Initialize value_pool + (cselib_finish): Free pool. + 2004-01-23 Eric Botcazou <ebotcazou@libertysurf.fr> * config/sparc/sparc.c (scan_record_type): New function. diff --git a/gcc/basic-block.h b/gcc/basic-block.h index e801baf48c7..10cc6351bd6 100644 --- a/gcc/basic-block.h +++ b/gcc/basic-block.h @@ -480,6 +480,10 @@ enum update_life_extent | PROP_SCAN_DEAD_CODE | PROP_AUTOINC \ | PROP_ALLOW_CFG_CHANGES \ | PROP_SCAN_DEAD_STORES) +#define PROP_POSTRELOAD (PROP_DEATH_NOTES \ + | PROP_KILL_DEAD_CODE \ + | PROP_SCAN_DEAD_CODE | PROP_AUTOINC \ + | PROP_SCAN_DEAD_STORES) #define CLEANUP_EXPENSIVE 1 /* Do relatively expensive optimizations except for edge forwarding */ @@ -495,6 +499,7 @@ enum update_life_extent #define CLEANUP_NO_INSN_DEL 128 /* Do not try to delete trivially dead insns. */ #define CLEANUP_CFGLAYOUT 256 /* Do cleanup in cfglayout mode. */ +#define CLEANUP_LOG_LINKS 512 /* Update log links. */ extern void life_analysis (rtx, FILE *, int); extern int update_life_info (sbitmap, enum update_life_extent, int); extern int update_life_info_in_dirty_blocks (enum update_life_extent, int); diff --git a/gcc/cfgcleanup.c b/gcc/cfgcleanup.c index ad44cbb4467..10bffe77293 100644 --- a/gcc/cfgcleanup.c +++ b/gcc/cfgcleanup.c @@ -1916,7 +1916,8 @@ cleanup_cfg (int mode) PROP_DEATH_NOTES | PROP_SCAN_DEAD_CODE | PROP_KILL_DEAD_CODE - | PROP_LOG_LINKS)) + | ((mode & CLEANUP_LOG_LINKS) + ? PROP_LOG_LINKS : 0))) break; } else if (!(mode & (CLEANUP_NO_INSN_DEL | CLEANUP_PRE_SIBCALL)) diff --git a/gcc/cselib.c b/gcc/cselib.c index 87cc3f4b8b4..de13ebef93d 100644 --- a/gcc/cselib.c +++ b/gcc/cselib.c @@ -130,7 +130,7 @@ static cselib_val dummy_val; May or may not contain the useless values - the list is compacted each time memory is invalidated. */ static cselib_val *first_containing_mem = &dummy_val; -static alloc_pool elt_loc_list_pool, elt_list_pool, cselib_val_pool; +static alloc_pool elt_loc_list_pool, elt_list_pool, cselib_val_pool, value_pool; /* Allocate a struct elt_list and fill in its two elements with the @@ -694,7 +694,12 @@ new_cselib_val (unsigned int value, enum machine_mode mode) #endif e->value = value; - e->u.val_rtx = gen_rtx_VALUE (mode); + /* We use custom method to allocate this RTL construct because it accounts + about 8% of overall memory usage. */ + e->u.val_rtx = pool_alloc (value_pool); + memset (e->u.val_rtx, 0, RTX_HDR_SIZE); + PUT_CODE (e->u.val_rtx, VALUE); + PUT_MODE (e->u.val_rtx, mode); CSELIB_VAL_PTR (e->u.val_rtx) = e; e->addr_list = 0; e->locs = 0; @@ -1392,6 +1397,8 @@ cselib_init (void) sizeof (struct elt_loc_list), 10); cselib_val_pool = create_alloc_pool ("cselib_val_list", sizeof (cselib_val), 10); + value_pool = create_alloc_pool ("value", + RTX_SIZE (VALUE), 100); /* This is only created once. */ if (! callmem) callmem = gen_rtx_MEM (BLKmode, const0_rtx); @@ -1420,6 +1427,7 @@ cselib_finish (void) free_alloc_pool (elt_list_pool); free_alloc_pool (elt_loc_list_pool); free_alloc_pool (cselib_val_pool); + free_alloc_pool (value_pool); clear_table (); reg_values_old = reg_values; reg_values = 0; diff --git a/gcc/toplev.c b/gcc/toplev.c index ea4c56358db..05e753a7628 100644 --- a/gcc/toplev.c +++ b/gcc/toplev.c @@ -2812,6 +2812,7 @@ rest_of_handle_life (tree decl, rtx insns) life_analysis (insns, rtl_dump_file, PROP_FINAL); if (optimize) cleanup_cfg ((optimize ? CLEANUP_EXPENSIVE : 0) | CLEANUP_UPDATE_LIFE + | CLEANUP_LOG_LINKS | (flag_thread_jumps ? CLEANUP_THREADING : 0)); timevar_pop (TV_FLOW); @@ -3456,7 +3457,7 @@ rest_of_compilation (tree decl) if (optimize) { - life_analysis (insns, rtl_dump_file, PROP_FINAL); + life_analysis (insns, rtl_dump_file, PROP_POSTRELOAD); cleanup_cfg (CLEANUP_EXPENSIVE | CLEANUP_UPDATE_LIFE | (flag_crossjumping ? CLEANUP_CROSSJUMP : 0)); |