OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

c-decl.c (delete_block): Remove. 

* c-decl.c (delete_block): Remove.
	* c-tree.h (delete_block): Remove.

From-SVN: r46795
This commit is contained in:
Neil Booth 2001-11-05 23:21:35 +00:00 committed by Neil Booth
parent 63d7500569
commit e6ec164c8d
3 changed files with 5 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/ChangeLog
View File

@ -1,3 +1,8 @@
2001-11-05 Neil Booth <neil@cat.daikokuya.demon.co.uk>
* c-decl.c (delete_block): Remove.
* c-tree.h (delete_block): Remove.
2001-11-05 Neil Booth <neil@cat.daikokuya.demon.co.uk>
* cppexp.c (lex, parse_defined): Update warning about defined.

24
gcc/c-decl.c
View File

@ -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. */

1
gcc/c-tree.h
View File

@ -177,7 +177,6 @@ extern int complete_array_type PARAMS ((tree, tree, int));
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));