AArch64: correct constraint on Upl early clobber alternatives
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr91802.f90
blob277d61aae82c7e287eacb18bacc59b679cf4783e
1 ! { dg-do compile }
2 ! { dg-options "-fcoarray=single" }
3 ! Code contributed by Gerhard Steinmetz
4 ! PR fortran/91802
5 module m
6 real :: x
7 dimension :: x(1,2,1,2,1,2,1,2)
8 codimension :: x[1,2,1,2,1,2,1,*] ! { dg-error "exceeds 15" }
9 end