flang/test/Lower/OpenMP/Todo/omp-declare-simd.f90

   1 ! This test checks lowering of OpenMP declare simd Directive.
   2
   3 // RUN: not flang-new -fc1 -emit-fir -fopenmp %s 2>&1 | FileCheck %s
   4
   5 subroutine sub(x, y)
   6   real, intent(inout) :: x, y
   7
   8   // CHECK: not yet implemented: OpenMPDeclareSimdConstruct
   9   !$omp declare simd(sub) aligned(x)
  10   x = 3.14 + y
  11 end