! RUN: %python %S/../test_symbols.py %s %flang_fc1 -fopenmp ! OpenMP Version 4.5 ! 2.7.1 Do Loop Constructs !DEF: /OMP_DO1 MainProgram program OMP_DO1 !DEF: /OMP_DO1/i ObjectEntity INTEGER(4) !DEF: /OMP_DO1/j ObjectEntity INTEGER(4) !DEF: /OMP_DO1/k (OmpThreadprivate) ObjectEntity INTEGER(4) !DEF: /OMP_DO1/n (OmpThreadprivate) ObjectEntity INTEGER(4) integer i, j, k, n !$omp threadprivate (k,n) !$omp do !DEF: /OMP_DO1/OtherConstruct1/i (OmpPrivate, OmpPreDetermined) HostAssoc INTEGER(4) do i=1,10 !REF: /OMP_DO1/j do j=1,10 print *, "Hello" end do end do !$omp end do end program OMP_DO1