[Bug fortran/43948] Valid generic procedure interface rejected

["burnus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #4 from burnus at gcc dot gnu dot org  2010-04-30 17:17 -------
(In reply to comment #3)
> Any chance to convert the code in comment #1 into a testcase?
> 
> laptop:kargl[205] grep "already present" *c
> laptop:kargl[206] grep "already" *c
> laptop:kargl[207] grep "Entity" *c

I think you mean comment 0 and "*.f* *.F*" rather than "*.c". And I find:

grep 'already present' *.f* *.F* |grep dg-
operator_5.f90:    MODULE PROCEDURE t_foo                  ! { dg-error
"already present" }
operator_5.f90:    MODULE PROCEDURE t_foo                  ! { dg-error
"already present" }
operator_5.f90:    MODULE PROCEDURE t_bar                  ! { dg-error
"already present" }
proc_decl_3.f90:    procedure a, a  ! { dg-error "already present in the
interface" }


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=43948