flang/test/Examples/omp-sections.f90

! REQUIRES: plugins, examples
! XFAIL: system-aix

! RUN: %flang_fc1 -load %llvmshlibdir/flangOmpReport%pluginext -plugin flang-omp-report -fopenmp %s -o - | FileCheck %s

subroutine omp_sections()
  integer :: x
  !$omp sections private(x)
    !$omp section
    call f1()
    !$omp section
    call f2()
  !$omp end sections nowait
end subroutine omp_sections

!CHECK: - file:            {{.*}}
!CHECK:   line:            [[@LINE-8]]
!CHECK:   construct:       section
!CHECK:   clauses:         []
!CHECK: - file:            {{.*}}
!CHECK:   line:            [[@LINE-10]]
!CHECK:   construct:       section
!CHECK:   clauses:         []
!CHECK: - file:            {{.*}}
!CHECK:   line:            [[@LINE-17]]
!CHECK:   construct:       sections
!CHECK:   clauses:
!CHECK:     - clause:          nowait
!CHECK:       details:         ''
!CHECK:     - clause:          private
!CHECK:       details:         x