tree.c (build_block): Removed unused 'tags' argument.

gcc:
	* tree.c (build_block): Removed unused 'tags' argument.
	* tree.h (build_block): Removed argument.
gcc/java:
	* expr.c (build_jni_stub): Updated for change to build_block.
gcc/treelang:
	* treetree.c (poplevel): Updated for change to build_block.
gcc/fortran:
	* f95-lang.c (poplevel): Updated for change to build_block.

From-SVN: r99019

gcc/ChangeLog

+2005-04-29  Tom Tromey  <tromey@redhat.com>
+
+	* tree.c (build_block): Removed unused 'tags' argument.
+	* tree.h (build_block): Removed argument.
+
 2005-04-29  Michael Matz  <matz@suse.de>
 
 	PR rtl-optimization/21144

gcc/fortran/ChangeLog

+2005-04-29  Tom Tromey  <tromey@redhat.com>
+
+	* f95-lang.c (poplevel): Updated for change to build_block.
+
 2005-04-29  Jakub Jelinek  <jakub@redhat.com>
 
 	PR fortran/13082

gcc/fortran/f95-lang.c

@@ -420,7 +420,7 @@ poplevel (int keep, int reverse, int functionbody)
      binding level is a function body, or if there are any nested blocks then
      create a BLOCK node to record them for the life of this function.  */
   if (keep || functionbody)
-    block_node = build_block (keep ? decl_chain : 0, 0, subblock_chain, 0, 0);
+    block_node = build_block (keep ? decl_chain : 0, subblock_chain, 0, 0);
 
   /* Record the BLOCK node just built as the subblock its enclosing scope.  */
   for (subblock_node = subblock_chain; subblock_node;

gcc/java/ChangeLog

+2005-04-29  Tom Tromey  <tromey@redhat.com>
+
+	* expr.c (build_jni_stub): Updated for change to build_block.
+
 2005-04-29  Andrew Pinski  <pinskia@gcc.gnu.org>
 
 	* expr.c (force_evaluation_order): Declare 'saved' earlier.

gcc/java/expr.c

@@ -2513,8 +2513,7 @@ build_jni_stub (tree method)
     method_args = DECL_ARGUMENTS (method);
   else
     method_args = BLOCK_EXPR_DECLS (DECL_FUNCTION_BODY (method));
-  block = build_block (env_var, NULL_TREE, NULL_TREE,
-		       method_args, NULL_TREE);
+  block = build_block (env_var, NULL_TREE, method_args, NULL_TREE);
   TREE_SIDE_EFFECTS (block) = 1;
   /* When compiling from source we don't set the type of the block,
      because that will prevent patch_return from ever being run.  */

gcc/tree.c

@@ -2830,8 +2830,7 @@ build_fn_decl (const char *name, tree type)
    compiled.  This information is used for outputting debugging info.  */
 
 tree
-build_block (tree vars, tree tags ATTRIBUTE_UNUSED, tree subblocks,
-	     tree supercontext, tree chain)
+build_block (tree vars, tree subblocks, tree supercontext, tree chain)
 {
   tree block = make_node (BLOCK);
 

gcc/tree.h

@@ -2905,7 +2905,7 @@ extern tree build_tree_list_stat (tree, tree MEM_STAT_DECL);
 extern tree build_decl_stat (enum tree_code, tree, tree MEM_STAT_DECL);
 extern tree build_fn_decl (const char *, tree); 
 #define build_decl(c,t,q) build_decl_stat (c,t,q MEM_STAT_INFO)
-extern tree build_block (tree, tree, tree, tree, tree);
+extern tree build_block (tree, tree, tree, tree);
 #ifndef USE_MAPPED_LOCATION
 extern void annotate_with_file_line (tree, const char *, int);
 extern void annotate_with_locus (tree, location_t);

gcc/treelang/ChangeLog

+2005-04-29  Tom Tromey  <tromey@redhat.com>
+
+	* treetree.c (poplevel): Updated for change to build_block.
+
 2005-04-23  DJ Delorie  <dj@redhat.com>
 
 	* parse.y: Adjust warning() callers.

gcc/treelang/treetree.c

@@ -1023,7 +1023,7 @@ poplevel (int keep, int reverse, int functionbody)
      binding level is a function body, or if there are any nested blocks then
      create a BLOCK node to record them for the life of this function.  */
   if (keep || functionbody)
-    block_node = build_block (keep ? decl_chain : 0, 0, subblock_chain, 0, 0);
+    block_node = build_block (keep ? decl_chain : 0, subblock_chain, 0, 0);
 
   /* Record the BLOCK node just built as the subblock its enclosing scope.  */
   for (subblock_node = subblock_chain; subblock_node;