From ee332da9f77d641cb731596e6d2545ba03b6b326 Mon Sep 17 00:00:00 2001 From: Paul Thomas Date: Thu, 4 Oct 2007 04:45:41 +0000 Subject: re PR fortran/33542 (gfortran does not detect ambigious specific names if they are the same as generic names) 2007-10-04 Paul Thomas PR fortran/33542 * interface.c (check_interface1): Revert patch of 2007-10-02. 2007-10-04 Paul Thomas PR fortran/33542 * gfortran.dg/ambiguous_specific_1.f90: Remove. From-SVN: r129000 --- gcc/fortran/interface.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'gcc/fortran/interface.c') diff --git a/gcc/fortran/interface.c b/gcc/fortran/interface.c index 6513517..741bba5 100644 --- a/gcc/fortran/interface.c +++ b/gcc/fortran/interface.c @@ -1044,8 +1044,7 @@ check_interface1 (gfc_interface *p, gfc_interface *q0, if (p->sym->name == q->sym->name && p->sym->module == q->sym->module) continue; - if (compare_interfaces (p->sym, q->sym, generic_flag) - || p->sym->name == q->sym->name) + if (compare_interfaces (p->sym, q->sym, generic_flag)) { if (referenced) { -- cgit v1.1