flang/test/Examples/omp-sections.f90

   1 ! REQUIRES: plugins, examples, shell
   2
   3 ! RUN: %flang_fc1 -load %llvmshlibdir/flangOmpReport.so -plugin flang-omp-report -fopenmp %s -o - | FileCheck %s
   4
   5 subroutine omp_sections()
   6   integer :: x
   7   !$omp sections private(x)
   8     !$omp section
   9     call f1()
  10     !$omp section
  11     call f2()
  12   !$omp end sections nowait
  13 end subroutine omp_sections
  14
  15 !CHECK: - file:            {{.*}}
  16 !CHECK:   line:            9
  17 !CHECK:   construct:       section
  18 !CHECK:   clauses:         []
  19 !CHECK: - file:            {{.*}}
  20 !CHECK:   line:            11
  21 !CHECK:   construct:       section
  22 !CHECK:   clauses:         []
  23 !CHECK: - file:            {{.*}}
  24 !CHECK:   line:            7
  25 !CHECK:   construct:       sections
  26 !CHECK:   clauses:
  27 !CHECK:     - clause:          nowait
  28 !CHECK:       details:         ''
  29 !CHECK:     - clause:          private
  30 !CHECK:       details:         x