From: Jim Wilson <wilson@cygnus.com>
Date: Sun, 9 Nov 1997 08:28:43 +0000 (+0000)
Subject: decl.c (add_block_current_level): Delete.
X-Git-Tag: releases/egcs-1.0.0~150
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=bd93ed181f39127afbd45abac638c085e2c67b5a;p=thirdparty%2Fgcc.git

decl.c (add_block_current_level): Delete.

        * decl.c (add_block_current_level): Delete.
        * init.c (build_vec_delete_1): Delete build_block and
        add_block_current_level calls.

From-SVN: r16387
---

diff --git a/gcc/cp/ChangeLog b/gcc/cp/ChangeLog
index f2825d72eafc..83eea91030e3 100644
--- a/gcc/cp/ChangeLog
+++ b/gcc/cp/ChangeLog
@@ -1,3 +1,9 @@
+Sun Nov  9 01:29:55 1997  Jim Wilson  (wilson@cygnus.com)
+
+	* decl.c (add_block_current_level): Delete.
+	* init.c (build_vec_delete_1): Delete build_block and
+	add_block_current_level calls.
+
 Thu Nov  6 11:28:14 1997  Jason Merrill  <jason@yorick.cygnus.com>
 
 	* method.c (emit_thunk): Don't let the backend defer generic thunks.
diff --git a/gcc/cp/decl.c b/gcc/cp/decl.c
index ca21b486f8dc..54e79dd3d52c 100644
--- a/gcc/cp/decl.c
+++ b/gcc/cp/decl.c
@@ -1398,16 +1398,6 @@ insert_block (block)
     = chainon (current_binding_level->blocks, block);
 }
 
-/* Add BLOCK to the current list of blocks for this binding contour.  */
-
-void
-add_block_current_level (block)
-     tree block;
-{
-  current_binding_level->blocks
-    = chainon (current_binding_level->blocks, block);
-}
-
 /* Set the BLOCK node for the innermost scope
    (the one we are currently in).  */
 
diff --git a/gcc/cp/init.c b/gcc/cp/init.c
index 7332c7bb8f9b..1ae838cc2734 100644
--- a/gcc/cp/init.c
+++ b/gcc/cp/init.c
@@ -2772,8 +2772,6 @@ build_vec_delete_1 (base, maxindex, type, auto_delete_vec, auto_delete,
   DECL_REGISTER (tbase) = 1;
   controller = build (BIND_EXPR, void_type_node, tbase, NULL_TREE, NULL_TREE);
   TREE_SIDE_EFFECTS (controller) = 1;
-  block = build_block (tbase, NULL_TREE, NULL_TREE, NULL_TREE, NULL_TREE);
-  add_block_current_level (block);
 
   if (auto_delete != integer_zero_node
       && auto_delete != integer_two_node)