18 lines · plain
1! RUN: %python %S/../test_errors.py %s %flang_fc1 -fopenmp2! OpenMP Version 4.53! 2.7.3 single Construct4! Copyprivate variable is not thread private or private in outer context5 6program omp_single7 integer i8 i = 109 10 !$omp parallel11 !$omp single12 print *, "omp single", i13 !ERROR: COPYPRIVATE variable 'i' is not PRIVATE or THREADPRIVATE in outer context14 !$omp end single copyprivate(i)15 !$omp end parallel16 17end program omp_single18