------- Comment #4 from dfranke at gcc dot gnu dot org 2010-06-12 17:47 -------
The patch below fixes the ICE in comment #2, but not the original report.
However, it also message-regresses on
FAIL: gfortran.dg/derived_function_interface_1.f90 -O (test for errors, line
41)
FAIL: gfortran.dg/derived_function_interface_1.f90 -O (test for errors, line
42)
FAIL: gfortran.dg/global_references_1.f90 -O (test for excess errors)
Index: decl.c
===================================================================
--- decl.c (revision 160638)
+++ decl.c (working copy)
@@ -863,7 +863,6 @@ get_proc_name (const char *name, gfc_sym
this is handled using gsymbols to register unique,globally
accessible names. */
if (sym->attr.flavor != 0
- && sym->attr.proc != 0
&& (sym->attr.subroutine || sym->attr.function)
&& sym->attr.if_source != IFSRC_UNKNOWN)
gfc_error_now ("Procedure '%s' at %C is already defined at %L",
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44348
