This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
c: Remove some dead code
- To: gcc-patches at gcc dot gnu dot org
- Subject: c: Remove some dead code
- From: Neil Booth <neil at daikokuya dot demon dot co dot uk>
- Date: Mon, 5 Nov 2001 22:44:45 +0000
- Cc: "Joseph S. Myers" <jsm28 at cam dot ac dot uk>
Remove an unused function from c-decl.c. Bootstrapped x86 Linux,
no regressions. OK?
Neil.
* c-tree.h (delete_block): Remove.
* c-decl.c (delete_block): Remove.
Index: c-tree.h
===================================================================
RCS file: /cvs/gcc/gcc/gcc/c-tree.h,v
retrieving revision 1.71
diff -u -p -r1.71 c-tree.h
--- c-tree.h 2001/10/11 12:43:39 1.71
+++ c-tree.h 2001/11/05 22:41:21
@@ -177,7 +177,6 @@ extern int complete_array_type
extern void declare_parm_level PARAMS ((int));
extern tree define_label PARAMS ((const char *, int,
tree));
-extern void delete_block PARAMS ((tree));
extern void finish_decl PARAMS ((tree, tree, tree));
extern void finish_decl_top_level PARAMS ((tree, tree, tree));
extern tree finish_enum PARAMS ((tree, tree, tree));
Index: c-decl.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/c-decl.c,v
retrieving revision 1.261
diff -u -p -r1.261 c-decl.c
--- c-decl.c 2001/11/02 23:59:58 1.261
+++ c-decl.c 2001/11/05 22:42:00
@@ -1211,30 +1211,6 @@ poplevel (keep, reverse, functionbody)
return block;
}
-/* Delete the node BLOCK from the current binding level.
- This is used for the block inside a stmt expr ({...})
- so that the block can be reinserted where appropriate. */
-
-void
-delete_block (block)
- tree block;
-{
- tree t;
- if (current_binding_level->blocks == block)
- current_binding_level->blocks = TREE_CHAIN (block);
- for (t = current_binding_level->blocks; t;)
- {
- if (TREE_CHAIN (t) == block)
- TREE_CHAIN (t) = TREE_CHAIN (block);
- else
- t = TREE_CHAIN (t);
- }
- TREE_CHAIN (block) = NULL;
- /* Clear TREE_USED which is always set by poplevel.
- The flag is set again if insert_block is called. */
- TREE_USED (block) = 0;
-}
-
/* Insert BLOCK at the end of the list of subblocks of the
current binding level. This is used when a BIND_EXPR is expanded,
to handle the BLOCK node inside the BIND_EXPR. */