diff options
| author | Janus Weil <janus@gcc.gnu.org> | 2010-01-17 14:33:11 +0100 |
|---|---|---|
| committer | Janus Weil <janus@gcc.gnu.org> | 2010-01-17 14:33:11 +0100 |
| commit | ae7c61dead40c0674b58c676a225ca05cea3ffe8 (patch) | |
| tree | 8c1bf05482652f2ce135f68f615e6f5f831954e3 /gcc/fortran/resolve.c | |
| parent | 8232dc642719b5b19812bffd1ee7f40888a7d328 (diff) | |
| download | gcc-ae7c61dead40c0674b58c676a225ca05cea3ffe8.zip gcc-ae7c61dead40c0674b58c676a225ca05cea3ffe8.tar.gz gcc-ae7c61dead40c0674b58c676a225ca05cea3ffe8.tar.bz2 | |
re PR fortran/42677 (Bogus Error: Ambiguous interfaces '...' in intrinsic assignment operator)
gcc/fortran/
2010-01-17 Janus Weil <janus@gcc.gnu.org>
PR fortran/42677
* gfortran.h (symbol_attribute): Remove 'ambiguous_interfaces'.
* interface.c (check_interface1): Move a warning message here from
resolve_fl_procedure.
(check_sym_interfaces): Removed 'attr.ambiguous_interfaces'.
* module.c (read_module): Remove call to gfc_check_interfaces, since
this comes too early here.
* resolve.c (resolve_fl_procedure): Move warning message to
check_interface1.
gcc/testsuite/
2010-01-17 Janus Weil <janus@gcc.gnu.org>
PR fortran/42677
* gfortran.dg/interface_assignment_5.f90: New test.
From-SVN: r155979
Diffstat (limited to 'gcc/fortran/resolve.c')
| -rw-r--r-- | gcc/fortran/resolve.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 9212521..6bc5fde 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -9077,10 +9077,6 @@ resolve_fl_procedure (gfc_symbol *sym, int mp_flag) { gfc_formal_arglist *arg; - if (sym->attr.ambiguous_interfaces && !sym->attr.referenced) - gfc_warning ("Although not referenced, '%s' at %L has ambiguous " - "interfaces", sym->name, &sym->declared_at); - if (sym->attr.function && resolve_fl_var_and_proc (sym, mp_flag) == FAILURE) return FAILURE; |