block_name_2.f90
1.9 KB
-
decl.c (gfc_match_end): Also check for construct name in END FORALL and END WERE statements. · 690af379
fortran/31471 fortran/ * decl.c (gfc_match_end): Also check for construct name in END FORALL and END WERE statements. * match.c (match_case_eos): Use uppercase for statement name in error message. (match_elsewhere): Construct name may appear iff construct has a name. testsuite/ * gfortran.dg/block_name_1.f90: New. * gfortran.dg/block_name_2.f90: New. From-SVN: r123758
Tobias Schlüter committed