1! PR middle-end/93555
2! { dg-do compile }
3
4subroutine foo
5  !$omp declare simd(foo)
6  !$omp declare simd(foo) inbranch
7end
8subroutine bar
9  !$omp declare simd(bar) inbranch
10  !$omp declare simd(bar)
11end
12