16 lines · plain
1! RUN: %python %S/../test_errors.py %s %flang_fc1 -fopenmp2! OpenMP Version 4.53! 2.15.3.6 Reduction Clause4program omp_reduction5 6 integer :: i7 integer :: k = 108 9 !ERROR: Invalid reduction identifier in REDUCTION clause.10 !$omp parallel do reduction(foo:k)11 do i = 1, 1012 k = foo(k)13 end do14 !$omp end parallel do15end program omp_reduction16