coarray_41.f90: Add "-latomic" option if libatomic_available.
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr77380.f90
blobf369be673a99dcb60c201bf07adc498dc0c3c417
1 ! { dg-do compile }
2 ! { dg-options "-fcoarray=lib -O2" }
3 program p
4 integer :: z(2)[*] = 1
5 z(:)[1] = z(:)[*] ! { dg-error "must be a scalar at" }
6 end