re PR fortran/34658 (save / common)
authorTobias Burnus <burnus@net-b.de>
Sun, 6 Jan 2008 18:17:14 +0000 (19:17 +0100)
committerTobias Burnus <burnus@gcc.gnu.org>
Sun, 6 Jan 2008 18:17:14 +0000 (19:17 +0100)
commit346ecba81ddd1a8555ca5704cbc484144e71f860
tree755c332e1253a3663ea68c8f58fe8cb64596b09c
parentcaa42d865f3ad3bd6986145a5e2e6597cacbcb48
re PR fortran/34658 (save / common)

2007-01-06  Tobias Burnus  <burnus@net-b.de>

        PR fortran/34658
        * match.c (gfc_match_common): Remove blank common in
        DATA BLOCK warning.
        * resolve.c (resolve_common_vars): New function.
        (resolve_common_blocks): Move checks to resolve_common_vars
        and invoke that function.
        (resolve_types): Call resolve_common_vars for blank commons.

2007-01-06  Tobias Burnus  <burnus@net-b.de>

        PR fortran/34658
        * gfortran.dg/common_11.f90: New.
        * gfortran.dg/blockdata_1.f90: Update test case.
        * gfortran.dg/blockdata_2.f90: Update test case.

From-SVN: r131355
gcc/fortran/ChangeLog
gcc/fortran/match.c
gcc/fortran/resolve.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/blockdata_1.f90
gcc/testsuite/gfortran.dg/blockdata_2.f90
gcc/testsuite/gfortran.dg/common_11.f90 [new file with mode: 0644]