15 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 integer :: i6 integer :: k = 107 8 !ERROR: Invalid reduction operator in REDUCTION clause.9 !$omp parallel do reduction(**:k)10 do i = 1, 1011 k = k ** 112 end do13 !$omp end parallel do14end program omp_reduction15