blockdata_1.f90
519 Bytes
-
re PR fortran/34658 (save / common) · 346ecba8
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
Tobias Burnus committed