aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/interface.c
diff options
context:
space:
mode:
authorPaul Thomas <pault@gcc.gnu.org>2007-01-02 14:23:36 +0000
committerPaul Thomas <pault@gcc.gnu.org>2007-01-02 14:23:36 +0000
commitff604888532c10d72b45494670151be4fadfbd39 (patch)
treeeaac45937e8ca8639bf0332ca79d422ef8b927ed /gcc/fortran/interface.c
parent06d40de8bb03594e0f0eb7d0636f8ca84ce7d86d (diff)
downloadgcc-ff604888532c10d72b45494670151be4fadfbd39.zip
gcc-ff604888532c10d72b45494670151be4fadfbd39.tar.gz
gcc-ff604888532c10d72b45494670151be4fadfbd39.tar.bz2
re PR fortran/20896 (ambiguous interface not detected)
2007-01-02 Paul Thomas <pault@gcc.gnu.org> PR fortran/20896 * interface.c (check_sym_interfaces): Remove call to resolve_global_procedure. gfortran.h : Remove prototype for resolve_global_procedure. resolve.c (resolve_global_procedure): Add static attribute to function declaration. 2007-01-02 Paul Thomas <pault@gcc.gnu.org> PR fortran/20896 * gfortran.dg/interface_10.f90: Remove. From-SVN: r120342
Diffstat (limited to 'gcc/fortran/interface.c')
-rw-r--r--gcc/fortran/interface.c5
1 files changed, 0 insertions, 5 deletions
diff --git a/gcc/fortran/interface.c b/gcc/fortran/interface.c
index 04618e7..dd1ac69 100644
--- a/gcc/fortran/interface.c
+++ b/gcc/fortran/interface.c
@@ -1016,11 +1016,6 @@ check_sym_interfaces (gfc_symbol * sym)
if (sym->ns != gfc_current_ns)
return;
- if (sym->attr.if_source == IFSRC_IFBODY
- && sym->attr.flavor == FL_PROCEDURE
- && !sym->attr.mod_proc)
- resolve_global_procedure (sym, &sym->declared_at, sym->attr.subroutine);
-
if (sym->generic != NULL)
{
sprintf (interface_name, "generic interface '%s'", sym->name);