1! RUN: %flang_fc1 -fdebug-unparse-no-sema -fopenmp %s | FileCheck %s 2 3program omp_simd 4 integer i 5 integer, allocatable :: a(:) 6 7 allocate(a(10)) 8 9 !NONTEMPORAL 10 !$omp simd nontemporal(a) 11 do i = 1, 10 12 a(i) = i 13 end do 14 !$omp end simd 15end program omp_simd 16!CHECK-LABEL: PROGRAM omp_simd 17 18!NONTEMPORAL 19!CHECK: !$OMP SIMD NONTEMPORAL(a) 20