arm: Add .type and .size to __gnu_cmse_nonsecure_call [PR115360]
[official-gcc.git] / gcc / testsuite / gfortran.dg / fimplicit_none_2.f90
blobfa8a8f4d055699d300a2e68e7704ade6fcbfe368
1 ! { dg-do compile }
2 ! { dg-options "-fimplicit-none" }
3 ! PR fortran/78239 - used to ICE
4 program p
5 character(*), parameter :: z(2) = [character(n) :: 'x', 'y'] ! { dg-error "Scalar INTEGER expression expected" }
6 end