re PR fortran/15481 ([meta-bugs] frontend adds superfluous symbols to namespaces)

* trans-decl.c (generate_local_decl): Remove workaround obsoleted
by fix for PR 15481.

From-SVN: r84475
This commit is contained in:
Tobias Schlüter 2004-07-11 00:31:18 +02:00 committed by Tobias Schlüter
parent 24727d92ff
commit 77dc410393
2 changed files with 3 additions and 11 deletions

View File

@ -12,6 +12,9 @@
* parse.c (decode_statement): Fix matching of BLOCK DATA.
* trans-decl.c (generate_local_decl): Remove workaround obsoleted
by fix for PR 15481.
2004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
* trans-common.c: Fix whitespace issues, make variable names

View File

@ -1906,17 +1906,6 @@ generate_local_decl (gfc_symbol * sym)
{
if (sym->attr.flavor == FL_VARIABLE)
{
/* TODO: The frontend sometimes creates symbols for things which don't
actually exist. E.g. common block names and the names of formal
arguments. The latter are created while attempting to parse
the argument list as a substring reference.
The proper fix is to avoid adding these symbols in the first place.
For now we hack round it by ignoring anything with an unknown type.
*/
if (sym->ts.type == BT_UNKNOWN)
return;
if (sym->attr.referenced)
gfc_get_symbol_decl (sym);
else if (sym->attr.dummy)