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

[Michael Klemm 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
+
----------------
mjklemm wrote:

For the worksharing loop directives, the closing `END` directive is optional.  However, I agree with the nit and we should have as a matter of style.

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