25 lines · plain
1! RUN: %python %S/../test_errors.py %s %flang -fopenmp2! OpenMP Version 4.53! 2.13.9 Depend Clause4! Coarrays are not supported in depend clause5 6program omp_depend_coarray7 integer :: a(3)[*], b(3) , k8 9 a(:) = this_image()10 b(:) = a(:)[1]11 k = 1012 13 !$omp parallel14 !$omp single15 !ERROR: Coarrays are not supported in DEPEND clause16 !$omp task shared(b) depend(out: a(:)[1])17 b = a + k18 !$omp end task19 !$omp end single20 !$omp end parallel21 22 print *, a, b23 24end program omp_depend_coarray25