cgraph.c (cgraph_add_new_function): Do early local passes.
authorJan Hubicka <jh@suse.cz>
Sun, 20 Jul 2008 16:06:51 +0000 (18:06 +0200)
committerJan Hubicka <hubicka@gcc.gnu.org>
Sun, 20 Jul 2008 16:06:51 +0000 (16:06 +0000)
* cgraph.c (cgraph_add_new_function): Do early local passes.
* tree-nrv.c (gate_pass_return_slot): New gate.
(pass_nrv): Add the gate.
* tree-ssa-coalese.c (hash_ssa_name_by_var, eq_ssa_name_by_var): New
functions.
(coalesce_ssa_name): Coalesce SSA names.
* tree-ssa-live.c (remove_unused_locals): Be more conservative when
not optimizing so unused user vars remains visible.
* common.opt (flag_tree_ter): Always enable by default.
* tree-ssa-ter.c: Include flags.h
(is_replaceable_p): Check that locations match; when aliasing is missing
be conservative about loads.
* tree-optimize.c (gate_init_datastructures): Remove.
(pass_init_datastructures): New.
* passes.c: Reorder passes so we always go into SSA.

From-SVN: r138010

gcc/ChangeLog
gcc/cgraph.c
gcc/common.opt
gcc/passes.c
gcc/tree-nrv.c
gcc/tree-optimize.c
gcc/tree-ssa-coalesce.c
gcc/tree-ssa-live.c
gcc/tree-ssa-ter.c

index 0a9a57a3c5ddfde5beef9dcd8b9824440e1d099b..63fff767c202658383b7ebd65a43d6dec0868128 100644 (file)
@@ -1,3 +1,21 @@
+2008-07-19  Jan Hubicka  <jh@suse.cz>
+
+       * cgraph.c (cgraph_add_new_function): Do early local passes.
+       * tree-nrv.c (gate_pass_return_slot): New gate.
+       (pass_nrv): Add the gate.
+       * tree-ssa-coalese.c (hash_ssa_name_by_var, eq_ssa_name_by_var): New
+       functions.
+       (coalesce_ssa_name): Coalesce SSA names.
+       * tree-ssa-live.c (remove_unused_locals): Be more conservative when
+       not optimizing so unused user vars remains visible.
+       * common.opt (flag_tree_ter): Always enable by default.
+       * tree-ssa-ter.c: Include flags.h
+       (is_replaceable_p): Check that locations match; when aliasing is missing
+       be conservative about loads.
+       * tree-optimize.c (gate_init_datastructures): Remove.
+       (pass_init_datastructures): New.
+       * passes.c: Reorder passes so we always go into SSA.
+
 2008-07-19  Jan Hubicka  <jh@suse.cz>
 
        * doc/extend.texi (flatten attribute): Remove note about unit-at-a-time
index 881bc42dfe195f38dd48bca57dffcaf49c39022d..3b3be13084e22d767df0512e241df949a17494b1 100644 (file)
@@ -1366,7 +1366,7 @@ cgraph_add_new_function (tree fndecl, bool lowered)
        if (!lowered)
           tree_lowering_passes (fndecl);
        bitmap_obstack_initialize (NULL);
-       if (!gimple_in_ssa_p (DECL_STRUCT_FUNCTION (fndecl)) && optimize)
+       if (!gimple_in_ssa_p (DECL_STRUCT_FUNCTION (fndecl)))
          execute_pass_list (pass_early_local_passes.pass.sub);
        bitmap_obstack_release (NULL);
        tree_rest_of_compilation (fndecl);
index 7c441155dfa82ec16cce860c559a302d1f44aa5d..fb76e1ec63084a3541f832ff46c56339ee55c4f6 100644 (file)
@@ -1157,7 +1157,7 @@ Common Report Var(flag_tree_sra) Optimization
 Perform scalar replacement of aggregates
 
 ftree-ter
-Common Report Var(flag_tree_ter) Optimization
+Common Report Var(flag_tree_ter) Init(1) Optimization
 Replace temporary expressions in the SSA->normal pass
 
 ftree-lrs
index e1d019fa9fd5e409bd4f911e606a241f34c8e1a8..bccbe70db7431513e5ae79a35040fd071ffa235b 100644 (file)
@@ -542,12 +542,13 @@ init_optimization_passes (void)
       NEXT_PASS (pass_cleanup_cfg);
       NEXT_PASS (pass_init_datastructures);
       NEXT_PASS (pass_expand_omp);
+
+      NEXT_PASS (pass_referenced_vars);
+      NEXT_PASS (pass_reset_cc_flags);
+      NEXT_PASS (pass_build_ssa);
       NEXT_PASS (pass_all_early_optimizations);
        {
          struct opt_pass **p = &pass_all_early_optimizations.pass.sub;
-         NEXT_PASS (pass_referenced_vars);
-         NEXT_PASS (pass_reset_cc_flags);
-         NEXT_PASS (pass_build_ssa);
          NEXT_PASS (pass_early_warn_uninitialized);
          NEXT_PASS (pass_rebuild_cgraph_edges);
          NEXT_PASS (pass_early_inline);
@@ -574,8 +575,8 @@ init_optimization_passes (void)
          NEXT_PASS (pass_tail_recursion);
          NEXT_PASS (pass_convert_switch);
           NEXT_PASS (pass_profile);
-         NEXT_PASS (pass_release_ssa_names);
        }
+      NEXT_PASS (pass_release_ssa_names);
       NEXT_PASS (pass_rebuild_cgraph_edges);
     }
   NEXT_PASS (pass_ipa_increase_alignment);
@@ -712,11 +713,12 @@ init_optimization_passes (void)
       NEXT_PASS (pass_tail_calls);
       NEXT_PASS (pass_rename_ssa_copies);
       NEXT_PASS (pass_uncprop);
-      NEXT_PASS (pass_del_ssa);
-      NEXT_PASS (pass_nrv);
-      NEXT_PASS (pass_mark_used_blocks);
-      NEXT_PASS (pass_cleanup_cfg_post_optimizing);
     }
+  NEXT_PASS (pass_del_ssa);
+  NEXT_PASS (pass_nrv);
+  NEXT_PASS (pass_mark_used_blocks);
+  NEXT_PASS (pass_cleanup_cfg_post_optimizing);
+
   NEXT_PASS (pass_warn_function_noreturn);
   NEXT_PASS (pass_free_datastructures);
   NEXT_PASS (pass_mudflap_2);
index cdf6c3fd9e6081f2f3ddfa31c7d2928ff8ffaa3d..f277be91d0cee6aef10707920e8b60ed13321c33 100644 (file)
@@ -226,12 +226,18 @@ tree_nrv (void)
   return 0;
 }
 
+static bool
+gate_pass_return_slot (void)
+{
+  return optimize > 0;
+}
+
 struct gimple_opt_pass pass_nrv = 
 {
  {
   GIMPLE_PASS,
   "nrv",                               /* name */
-  NULL,                                        /* gate */
+  gate_pass_return_slot,               /* gate */
   tree_nrv,                            /* execute */
   NULL,                                        /* sub */
   NULL,                                        /* next */
index 35feaa1be5ba6b37d94927c5271d738d725ff6d3..8a0fe0c8ce356f54349826aaa3ad7042fcae7724 100644 (file)
@@ -341,20 +341,12 @@ execute_init_datastructures (void)
   return 0;
 }
 
-/* Gate: initialize or not the SSA datastructures.  */
-
-static bool
-gate_init_datastructures (void)
-{
-  return (optimize >= 1);
-}
-
 struct gimple_opt_pass pass_init_datastructures =
 {
  {
   GIMPLE_PASS,
   NULL,                                        /* name */
-  gate_init_datastructures,            /* gate */
+  NULL,                                        /* gate */
   execute_init_datastructures,         /* execute */
   NULL,                                        /* sub */
   NULL,                                        /* next */
index 388437d44bb09310dfb527b6fa962444e18aecba..a96029aa7c5170b31bafc115254a629c37d6f031 100644 (file)
@@ -1297,6 +1297,24 @@ coalesce_partitions (var_map map, ssa_conflicts_p graph, coalesce_list_p cl,
     }
 }
 
+/* Returns a hash code for P.  */
+
+static hashval_t
+hash_ssa_name_by_var (const void *p)
+{
+  const_tree n = (const_tree) p;
+  return (hashval_t) htab_hash_pointer (SSA_NAME_VAR (n));
+}
+
+/* Returns nonzero if P1 and P2 are equal.  */
+
+static int
+eq_ssa_name_by_var (const void *p1, const void *p2)
+{
+  const_tree n1 = (const_tree) p1;
+  const_tree n2 = (const_tree) p2;
+  return SSA_NAME_VAR (n1) == SSA_NAME_VAR (n2);
+}
 
 /* Reduce the number of copies by coalescing variables in the function.  Return
    a partition map with the resulting coalesces.  */
@@ -1310,10 +1328,42 @@ coalesce_ssa_name (void)
   coalesce_list_p cl;
   bitmap used_in_copies = BITMAP_ALLOC (NULL);
   var_map map;
+  unsigned int i;
+  static htab_t ssa_name_hash;
 
   cl = create_coalesce_list ();
   map = create_outofssa_var_map (cl, used_in_copies);
 
+  /* We need to coalesce all names originating same SSA_NAME_VAR
+     so debug info remains undisturbed.  */
+  if (!optimize)
+    {
+      ssa_name_hash = htab_create (10, hash_ssa_name_by_var,
+                                  eq_ssa_name_by_var, NULL);
+      for (i = 1; i < num_ssa_names; i++)
+       {
+         tree a = ssa_name (i);
+
+         if (a && SSA_NAME_VAR (a) && !DECL_ARTIFICIAL (SSA_NAME_VAR (a)))
+           {
+             tree *slot = (tree *) htab_find_slot (ssa_name_hash, a, INSERT);
+
+             if (!*slot)
+               *slot = a;
+             else
+               {
+                 add_coalesce (cl, SSA_NAME_VERSION (a), SSA_NAME_VERSION (*slot),
+                               MUST_COALESCE_COST - 1);
+                 bitmap_set_bit (used_in_copies, SSA_NAME_VERSION (a));
+                 bitmap_set_bit (used_in_copies, SSA_NAME_VERSION (*slot));
+               }
+           }
+       }
+      htab_delete (ssa_name_hash);
+    }
+  if (dump_file && (dump_flags & TDF_DETAILS))
+    dump_var_map (dump_file, map);
+
   /* Don't calculate live ranges for variables not in the coalesce list.  */
   partition_view_bitmap (map, used_in_copies, true);
   BITMAP_FREE (used_in_copies);
index c277980ed86968d6e93ec7e20fd519451118f101..a5f75963da017093daddabb916ed5b5ab734f702 100644 (file)
@@ -582,7 +582,8 @@ remove_unused_locals (void)
   var_ann_t ann;
   bitmap global_unused_vars = NULL;
 
-  mark_scope_block_unused (DECL_INITIAL (current_function_decl));
+  if (optimize)
+    mark_scope_block_unused (DECL_INITIAL (current_function_decl));
   /* Assume all locals are unused.  */
   FOR_EACH_REFERENCED_VAR (t, rvi)
     var_ann (t)->used = false;
@@ -661,7 +662,8 @@ remove_unused_locals (void)
 
          if (TREE_CODE (var) == VAR_DECL
              && is_global_var (var)
-             && bitmap_bit_p (global_unused_vars, DECL_UID (var)))
+             && bitmap_bit_p (global_unused_vars, DECL_UID (var))
+             && (optimize || DECL_ARTIFICIAL (var)))
            *cell = TREE_CHAIN (*cell);
          else
            cell = &TREE_CHAIN (*cell);
@@ -681,9 +683,11 @@ remove_unused_locals (void)
        && TREE_CODE (t) != RESULT_DECL
        && !(ann = var_ann (t))->used
        && !ann->symbol_mem_tag
-       && !TREE_ADDRESSABLE (t))
+       && !TREE_ADDRESSABLE (t)
+       && (optimize || DECL_ARTIFICIAL (t)))
       remove_referenced_var (t);
-  remove_unused_scope_block_p (DECL_INITIAL (current_function_decl));
+  if (optimize)
+    remove_unused_scope_block_p (DECL_INITIAL (current_function_decl));
 }
 
 
index a93001a985b6ce3308bb95596a8cc2f25bd372fa..e02867520c8d42e298af026a42da2a7b71ba89c3 100644 (file)
@@ -30,6 +30,7 @@ along with GCC; see the file COPYING3.  If not see
 #include "tree-flow.h"
 #include "tree-dump.h"
 #include "tree-ssa-live.h"
+#include "flags.h"
 
 
 /* Temporary Expression Replacement (TER)
@@ -364,6 +365,8 @@ is_replaceable_p (tree stmt)
   tree call_expr;
   use_operand_p use_p;
   tree def, use_stmt;
+  location_t locus1, locus2;
+  tree block1, block2;
 
   /* Only consider modify stmts.  */
   if (TREE_CODE (stmt) != GIMPLE_MODIFY_STMT)
@@ -386,6 +389,36 @@ is_replaceable_p (tree stmt)
   if (bb_for_stmt (use_stmt) != bb_for_stmt (stmt))
     return false;
 
+  if (GIMPLE_STMT_P (stmt))
+    {
+      locus1 = GIMPLE_STMT_LOCUS (stmt);
+      block1 = GIMPLE_STMT_BLOCK (stmt);
+    }
+  else
+    {
+      locus1 = *EXPR_LOCUS (stmt);
+      block1 = TREE_BLOCK (stmt);
+    }
+  if (GIMPLE_STMT_P (use_stmt))
+    {
+      locus2 = GIMPLE_STMT_LOCUS (use_stmt);
+      block2 = GIMPLE_STMT_BLOCK (use_stmt);
+    }
+  if (TREE_CODE (use_stmt) == PHI_NODE)
+    {
+      locus2 = 0;
+      block2 = NULL_TREE;
+    }
+  else
+    {
+      locus2 = *EXPR_LOCUS (use_stmt);
+      block2 = TREE_BLOCK (use_stmt);
+    }
+
+  if (!optimize
+      && ((locus1 && locus1 != locus2) || (block1 && block1 != block2)))
+    return false;
+
   /* Used in this block, but at the TOP of the block, not the end.  */
   if (TREE_CODE (use_stmt) == PHI_NODE)
     return false;
@@ -394,6 +427,10 @@ is_replaceable_p (tree stmt)
   if (!(ZERO_SSA_OPERANDS (stmt, SSA_OP_VDEF)))
     return false;
 
+  /* Without alias info we can't move around loads.  */
+  if (stmt_ann (stmt)->references_memory && !optimize)
+    return false;
+
   /* Float expressions must go through memory if float-store is on.  */
   if (flag_float_store 
       && FLOAT_TYPE_P (TREE_TYPE (GENERIC_TREE_OPERAND (stmt, 1))))
@@ -412,7 +449,6 @@ is_replaceable_p (tree stmt)
   /* Leave any stmt with volatile operands alone as well.  */
   if (stmt_ann (stmt)->has_volatile_ops)
     return false;
-  
 
   return true;
 }