AArch64: correct constraint on Upl early clobber alternatives
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr68154.f90
blob6415eb0b804809ff058d0f86df8865b19a80c833
1 ! { dg-do compile }
2 ! PR fortran/68154
3 ! Original code contributed by Gerhard Steinmetz
4 ! gerhard dot steinmetz dot fortran at t-online dot de
5 program p
6 character(1), parameter :: x1(2) = 'a'
7 character(*), parameter :: x2(2) = x1
8 character(*), parameter :: x3(*) = x1
9 end