diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2016-12-06 17:13:31 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2016-12-06 17:13:31 +0000 |
| commit | 34022d2b2e55c34e2a86af04d9bfe5548e71f63e (patch) | |
| tree | 621a99be891691a1fec5b2d90fd9f2f2b41b5a4f /gcc/fortran/resolve.c | |
| parent | 0eada3216bc0eab65325bdcf0fee3584007830ff (diff) | |
| download | gcc-34022d2b2e55c34e2a86af04d9bfe5548e71f63e.zip gcc-34022d2b2e55c34e2a86af04d9bfe5548e71f63e.tar.gz gcc-34022d2b2e55c34e2a86af04d9bfe5548e71f63e.tar.bz2 | |
re PR fortran/78659 ([F03] Spurious "requires DTIO" reported against namelist statement)
2016-12-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/78659
* resolve.c (resolve_fl_namelist): Remove unneeded error.
PR fortran/78659
* gfortran.dg/alloc_comp_constraint_1.f90: Update test.
* gfortran.dg/alloc_comp_constraint_7.f90: New test.
* gfortran.dg/namelist_34.f90: Update test.
* gfortran.dg/namelist_63.f90: Update test.
From-SVN: r243308
Diffstat (limited to 'gcc/fortran/resolve.c')
| -rw-r--r-- | gcc/fortran/resolve.c | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 7bc9f5f..e4ea10f 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -13900,15 +13900,7 @@ resolve_fl_namelist (gfc_symbol *sym) "or POINTER components", nl->sym->name, sym->name, &sym->declared_at)) return false; - - if (!dtio) - { - gfc_error ("NAMELIST object %qs in namelist %qs at %L has " - "ALLOCATABLE or POINTER components and thus requires " - "a defined input/output procedure", nl->sym->name, - sym->name, &sym->declared_at); - return false; - } + return true; } } |