7 lines
226 B
Fortran
7 lines
226 B
Fortran
!RUN: %flang_fc1 -flang-experimental-hlfir -emit-hlfir -fopenmp %s -o - | FileCheck %s
|
|
!RUN: bbc -hlfir -emit-hlfir -fopenmp %s -o - | FileCheck %s
|
|
|
|
subroutine sample()
|
|
! CHECK: omp.barrier
|
|
!$omp barrier
|
|
end subroutine sample
|