1! PR fortran/80918
2! { dg-do compile }
3
4subroutine foo (a)
5  integer :: a(*)
6  !$omp task depend(inout:a)
7  !$omp end task
8  !$omp task depend(inout:a)
9  !$omp end task
10end subroutine foo
11