Remove dead code

gcc/fortran/
	* match.c (gfc_match_common): Remove dead variable old_blank_common.

From-SVN: r228458
This commit is contained in:
Mikael Morin 2015-10-04 13:42:03 +00:00
parent 2b3f52a2d0
commit 2018f53e80
2 changed files with 5 additions and 8 deletions

View File

@ -1,3 +1,7 @@
2015-10-04 Mikael Morin <mikael@gcc.gnu.org>
* match.c (gfc_match_common): Remove dead variable old_blank_common.
2015-10-04 Mikael Morin <mikael@gcc.gnu.org>
PR fortran/67758

View File

@ -4278,20 +4278,13 @@ match match_common_name (char *name)
match
gfc_match_common (void)
{
gfc_symbol *sym, **head, *tail, *other, *old_blank_common;
gfc_symbol *sym, **head, *tail, *other;
char name[GFC_MAX_SYMBOL_LEN + 1];
gfc_common_head *t;
gfc_array_spec *as;
gfc_equiv *e1, *e2;
match m;
old_blank_common = gfc_current_ns->blank_common.head;
if (old_blank_common)
{
while (old_blank_common->common_next)
old_blank_common = old_blank_common->common_next;
}
as = NULL;
for (;;)