re PR rtl-optimization/12547 ([tree-ssa] simple java code with -fcheck-references...

        PR optimization/12547
        * lang.c (java_tree_inlining_walk_subtrees): Just walk
        BLOCK_EXPR_BODY directly.

From-SVN: r73530

diff --git a/gcc/java/ChangeLog b/gcc/java/ChangeLog
index 96d03d0d1ea6a36129fc97abb4e3bb5da08f6a54..e06e99741b1451beb05967d333157707ead8ea68 100644 (file)
--- a/gcc/java/ChangeLog
+++ b/gcc/java/ChangeLog
@@ -1,3 +1,9 @@
+2003-11-12  Jason Merrill  <jason@redhat.com>
+
+       PR optimization/12547
+       * lang.c (java_tree_inlining_walk_subtrees): Just walk
+       BLOCK_EXPR_BODY directly.
+
 2003-11-12  Andrew Haley  <aph@redhat.com>
 
        PR java/11045

diff --git a/gcc/java/lang.c b/gcc/java/lang.c
index a649a4ad0f9ea7c59dd37bfb16bc3bc284c02f33..c2494daaceafbe8d1551b7def91a877f687ba202 100644 (file)
--- a/gcc/java/lang.c
+++ b/gcc/java/lang.c
@@ -840,21 +840,14 @@ java_tree_inlining_walk_subtrees (tree *tp ATTRIBUTE_UNUSED,
   switch (code)
     {
     case BLOCK:
-      if (BLOCK_EXPR_BODY (t))
-       {
-         tree *prev = &BLOCK_EXPR_BODY (*tp);
-         while (*prev)
-           {
-             WALK_SUBTREE (*prev);
-             prev = &TREE_CHAIN (*prev);
-           }       
-       }
+      WALK_SUBTREE (BLOCK_EXPR_BODY (t));
       return NULL_TREE;
-      break;
 
     default:
       return NULL_TREE;
     }
+
+  #undef WALK_SUBTREE
 }
 
 /* Called from unsafe_for_reeval.  */