1!RUN: %flang_fc1 -flang-experimental-hlfir -emit-hlfir -fopenmp %s -o - | FileCheck %s 2!RUN: bbc -hlfir -emit-hlfir -fopenmp %s -o - | FileCheck %s 3 4subroutine sample() 5! CHECK: omp.barrier 6!$omp barrier 7end subroutine sample 8