Commit 77dc4103 by Tobias Schlüter Committed by Tobias Schlüter

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
parent 24727d92
......@@ -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
......
......@@ -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)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment