21 lines · plain
1! RUN: %flang_fc1 -emit-hlfir -fopenmp -mmlir --enable-delayed-privatization \2! RUN: -o - %s 2>&1 | FileCheck %s3! RUN: bbc -emit-hlfir -fopenmp --enable-delayed-privatization -o - %s 2>&1 |\4! RUN: FileCheck %s5 6!===============================================================================7! `private` clause on `target teams`8!===============================================================================9 10subroutine target_teams_private()11integer, dimension(3) :: i12!$omp target teams private(i)13!$omp end target teams14end subroutine15 16! CHECK: omp.target {{.*}} {17! CHECK: omp.teams {18! CHECK: %{{.*}} = fir.alloca !fir.array<3xi32> {bindc_name = "i", {{.*}}}19! CHECK: }20! CHECK: }21