1! { dg-do compile }
2! { dg-options "-fcoarray=lib -lcaf_single" }
3!
4! Check that reffing x on both sides of a coarray send does not ICE.
5! PR 85507
6
7program check_dependency
8  integer :: x[*]
9  x[42] = x
10end program check_dependency
11
12