java-gimplify.c (java_gimplify_block): set TREE_USED on the new block.

2004-06-21  Andrew Haley  <aph@redhat.com>

	* java-gimplify.c (java_gimplify_block): set TREE_USED on the new
	block.

From-SVN: r83441

diff --git a/gcc/java/ChangeLog b/gcc/java/ChangeLog
index fff8cfe686aba753ef3b2ae633b0c3aaac3fbcf7..cd9cffb67d235da1bbe381dd31f93e328caa6862 100644 (file)
--- a/gcc/java/ChangeLog
+++ b/gcc/java/ChangeLog
@@ -1,3 +1,8 @@
+2004-06-21  Andrew Haley  <aph@redhat.com>
+
+       * java-gimplify.c (java_gimplify_block): set TREE_USED on the new
+       block.
+
 2004-06-21  Joseph S. Myers  <jsm@polyomino.org.uk>
 
        * jcf.h (struct JCF): Change java_source, right_zip and finished

diff --git a/gcc/java/java-gimplify.c b/gcc/java/java-gimplify.c
index 987351c2102f40238b6a70972044a297188b676b..3c446672255efec91c0cc73e58516d9a45210108 100644 (file)
--- a/gcc/java/java-gimplify.c
+++ b/gcc/java/java-gimplify.c
@@ -177,6 +177,11 @@ java_gimplify_block (tree java_block)
      because they use BLOCK_SUBBLOCKS for another purpose.  */
   block = make_node (BLOCK);
   BLOCK_VARS (block) = decls;
+
+  /* The TREE_USED flag on a block determines whether the debug ouput
+     routines generate info for the variables in that block.  */
+  TREE_USED (block) = 1;
+
   if (outer != NULL_TREE)
     {
       outer = BIND_EXPR_BLOCK (outer);