[flang-commits] [flang] Skip compiler directives between OMP PARALLEL DO and the loop (PR #81021)

[Mats Petersson via flang-commits]

================
@@ -30,6 +30,13 @@
      c = c - 1
   END DO outer
 
+  ! Accept directives between parallel do and actual loop.
+  !$OMP PARALLEL DO
+  !DIR$ VECTOR ALIGNED
+  DO 20 i=1,N
+     a = a + 0.5
+20   CONTINUE
+
----------------
Leporacanthicus wrote:

I didn't add it, because it wasn't in the other tests that do similar loops. But I agree, it's nicer to have, so I have added it now. 

https://github.com/llvm/llvm-project/pull/81021