24 lines · plain
1! Tests the OMPIRBuilder can handle multiple privatization regions that contain2! multiple BBs (for example, for allocatables).3 4! RUN: %flang -S -emit-llvm -fopenmp -mmlir --enable-delayed-privatization \5! RUN: -o - %s 2>&1 | FileCheck %s6 7subroutine foo(x)8 integer, allocatable :: x, y9!$omp parallel private(x, y)10 x = y11!$omp end parallel12end13 14! CHECK-LABEL: define void @foo_15! CHECK: ret void16! CHECK-NEXT: }17 18! CHECK-LABEL: define internal void @foo_..omp_par19! CHECK-DAG: call ptr @malloc20! CHECK-DAG: call ptr @malloc21! CHECK-DAG: call void @free22! CHECK-DAG: call void @free23! CHECK: }24