c: Fix up pointer types to may_alias structures [PR114493]
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr66107.f90
blob5127efaeed31856eddd0f494712876fc39fda349
1 ! { dg-do compile }
2 ! PR fortran/66107
3 subroutine p
4 integer n
5 character(*), parameter :: z(1) = [character(len=n) :: 'x'] ! { dg-error "Cannot initialize parameter array at .1. with variable length elements" }
6 end subroutine