diff options
| author | Janus Weil <janus@gcc.gnu.org> | 2018-09-11 19:44:04 +0200 |
|---|---|---|
| committer | Janus Weil <janus@gcc.gnu.org> | 2018-09-11 19:44:04 +0200 |
| commit | 0e4cb16f565fa292328c7e57689b7ca0f09e0625 (patch) | |
| tree | fbe9168c5ec760fc1fb05d45979400ef2ddc935b /gcc/fortran/resolve.c | |
| parent | 2e3d2422343315fbe2c84c551eb7c8ef18021573 (diff) | |
| download | gcc-0e4cb16f565fa292328c7e57689b7ca0f09e0625.zip gcc-0e4cb16f565fa292328c7e57689b7ca0f09e0625.tar.gz gcc-0e4cb16f565fa292328c7e57689b7ca0f09e0625.tar.bz2 | |
re PR fortran/87172 (Spurious "Derived type 'c_funptr' at (1) has not been declared" error after r263782)
fix PR 87172
2018-09-11 Janus Weil <janus@gcc.gnu.org>
PR fortran/87172
* resolve.c (resolve_fl_derived): If a type has the 'use_assoc'
attribute, then it was declared in another module, so there should be
no error that it has not been declared.
2018-09-11 Janus Weil <janus@gcc.gnu.org>
PR fortran/87172
* gfortran.dg/iso_c_binding_only_2.f90: New test case.
From-SVN: r264214
Diffstat (limited to 'gcc/fortran/resolve.c')
| -rw-r--r-- | gcc/fortran/resolve.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index ded2762..ea0ce80 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -14245,7 +14245,7 @@ resolve_fl_derived (gfc_symbol *sym) &sym->declared_at)) return false; - if (sym->components == NULL && !sym->attr.zero_comp) + if (sym->components == NULL && !sym->attr.zero_comp && !sym->attr.use_assoc) { gfc_error ("Derived type %qs at %L has not been declared", sym->name, &sym->declared_at); |