]> git.ipfire.org Git - thirdparty/gcc.git/commit
re PR fortran/31818 (Wrongly accepts namelists with assumed-shape arrays)
authorDaniel Franke <franke.daniel@gmail.com>
Sat, 28 Jul 2007 08:51:06 +0000 (04:51 -0400)
committerDaniel Franke <dfranke@gcc.gnu.org>
Sat, 28 Jul 2007 08:51:06 +0000 (04:51 -0400)
commit5cca320dca64f20a69be6cbfd0145df99a5168ac
tree104c0f20c96545cd7c2f19d9fb931ba20274aa9d
parent758137cd60130053849b6c6258acfd2f81463739
re PR fortran/31818 (Wrongly accepts namelists with assumed-shape arrays)

gcc/fortran:
2007-07-28  Daniel Franke  <franke.daniel@gmail.com>

PR fortran/31818
PR fortran/32876
PR fortran/32905
* gfortran.h (symbol_attribute): Added bits for pointer_comp, private_comp.
* parse.c (parse_derived): Set pointer_comp/private_comp bits if the derived
type ultimately contains pointer components or private components.
* module.c (ab_attribute): New values AB_POINTER_COMP, AB_PRIVATE_COMP.
(attr_bits): Added names for new ab_attributes.
(mio_symbol_attribute): Save/restore new attribute bits in modules.
* match.c (gfc_match_namelist): Removed check for namelist objects of assumed
shape.
* resolve.c (resolve_fl_namelist): Added check for pointer or private
components in nested types. Added check for namelist objects of assumed
shape.

gcc/testsuite:
2007-07-28  Daniel Franke  <franke.daniel@gmail.com>

* gfortran.dg/namelist_5.f90: Adjusted error message.
* gfortran.dg/assumed_shape_nml.f90: Renamed to ...
* gfortran.dg/namelist_31.f90: ... this. Removed dg-warning directive.
* gfortran.dg/assumed_size_nml.f90: Renamed to ...
* gfortran.dg/namelist_32.f90: ... this.

PR fortran/32876
* gfortran.dg/namelist_33.f90: New test.

PR fortran/32905
* gfortran.dg/namelist_34.f90: New test.

PR fortran/31818
* gfortran.dg/namelist_35.f90: New test.

From-SVN: r127014
13 files changed:
gcc/fortran/ChangeLog
gcc/fortran/gfortran.h
gcc/fortran/match.c
gcc/fortran/module.c
gcc/fortran/parse.c
gcc/fortran/resolve.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/namelist_31.f90 [moved from gcc/testsuite/gfortran.dg/assumed_shape_nml.f90 with 80% similarity]
gcc/testsuite/gfortran.dg/namelist_32.f90 [moved from gcc/testsuite/gfortran.dg/assumed_size_nml.f90 with 100% similarity]
gcc/testsuite/gfortran.dg/namelist_33.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/namelist_34.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/namelist_35.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/namelist_5.f90