PR tree-optimization/86415 - strlen() not folded for substrings within constant arrays
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr69497.f90
blob7b57ee1336817d5d0aa8d04ee947680d648648d8
1 ! { dg-do compile }
2 ! PR89497
3 program p
4 block
5 do
6 end block ! { dg-error "Expecting END DO statement" }
7 end ! { dg-error "END DO statement expected" }
8 ! { dg-excess-errors "Unexpected end of file" }