PR tree-optimization/86415 - strlen() not folded for substrings within constant arrays
[official-gcc.git] / gcc / testsuite / gfortran.dg / coarray_dependency_1.f90
blobdc4cbacba1eaff81741dff0c042e72f391a00378
1 ! { dg-do compile }
2 ! { dg-options "-fcoarray=lib -lcaf_single" }
4 ! Check that reffing x on both sides of a coarray send does not ICE.
5 ! PR 85507
7 program check_dependency
8 integer :: x[*]
9 x[42] = x
10 end program check_dependency