------- Comment #4 from burnus at gcc dot gnu dot org 2008-01-06 18:17 ------- Subject: Bug 34658
Author: burnus Date: Sun Jan 6 18:17:14 2008 New Revision: 131355 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=131355 Log: 2007-01-06 Tobias Burnus <[EMAIL PROTECTED]> 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 <[EMAIL PROTECTED]> 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. Added: trunk/gcc/testsuite/gfortran.dg/common_11.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/match.c trunk/gcc/fortran/resolve.c trunk/gcc/testsuite/ChangeLog trunk/gcc/testsuite/gfortran.dg/blockdata_1.f90 trunk/gcc/testsuite/gfortran.dg/blockdata_2.f90 -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34658