| !RUN: %flang_fc1 -emit-hlfir -fopenmp %s -o - | FileCheck %s | |
| !CHECK-LABEL: @_QPomp_taskwait | |
| subroutine omp_taskwait | |
| !CHECK: omp.taskwait | |
| !$omp taskwait | |
| !CHECK: fir.call @_QPfoo() {{.*}}: () -> () | |
| call foo() | |
| !CHECK: omp.taskwait | |
| !$omp taskwait | |
| end subroutine omp_taskwait |