PR inline-asm/84742

[official-gcc.git] / gcc / testsuite / gfortran.dg / coarray_28.f90

! { dg-do compile }
! { dg-options "-fcoarray=single" }
!
! PR fortran/54225
!

integer, allocatable :: a[:,:]

allocate (a[*,4]) ! { dg-error "Unexpected '.' for codimension 1 of 2" }
end