CodeQL / Analyze (actions) (push) Canceled after 0s
CodeQL / Analyze (python) (push) Canceled after 0s
pre-commit / pre-commit (push) Canceled after 0s
Multi-Arch CI / setup (push) Canceled after 0s
Publish build_manylinux_x86_64 images / publish_build_manylinux_x86_64 (push) Canceled after 0s
Setup (Multi-Arch) / setup (push) Canceled after 0s
Multi-Arch CI / Linux::${{ fromJSON(needs.setup.outputs.linux_build_config || '{}').build_variant_label || 'skip' }} (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Publish no_rocm_image_ubi10 image / publish_no_rocm_image_ubi10 (push) Canceled after 0s
Multi-Arch CI / Windows::${{ fromJSON(needs.setup.outputs.windows_build_config || '{}').build_variant_label || 'skip' }} (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Multi-Arch CI / Manifest Diff (push) Canceled after 0s
TheRock Manifest Diff Report / Generate Manifest Diff Report (push) Canceled after 0s
Multi-Arch CI / CI Summary (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04 (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04_ocl_rt images / publish_no_rocm_image_ubuntu24_04_ocl_rt (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_rocgdb (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04_rocgdb images / publish_no_rocm_image_ubuntu24_04_rocgdb (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_ocl_rt (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Unit Tests / Unit Tests :: ubuntu-24.04 (push) Canceled after 0s
Unit Tests / Unit Tests :: windows-2022 (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_media (push) Canceled after 0s
Unit Tests / Unit Tests Summary (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_openmpi (push) Canceled after 0s
55 lines
1.7 KiB
Fortran
55 lines
1.7 KiB
Fortran
!! Make sure that mixture of by-ref and by-val reductions work all the way
|
|
!! to LLVM-IR code.
|
|
|
|
! RUN: %flang_fc1 -emit-llvm -fopenmp -o - %s 2>&1 \
|
|
! RUN: | FileCheck %s
|
|
|
|
subroutine proc
|
|
implicit none
|
|
real(8),allocatable :: F(:)
|
|
real(8),allocatable :: A(:)
|
|
|
|
integer :: I
|
|
|
|
!$omp parallel private(A) reduction(+:F,I)
|
|
allocate(A(10))
|
|
!$omp end parallel
|
|
end subroutine proc
|
|
|
|
!CHECK-LABEL: define void @proc_()
|
|
!CHECK: call void (ptr, i32, ptr, ...)
|
|
!CHECK-SAME: @__kmpc_fork_call(ptr {{.*}}, i32 1, ptr @[[OMP_PAR:.*]], {{.*}})
|
|
|
|
!CHECK: define internal void @[[OMP_PAR]](ptr {{.*}} %[[TID_ADDR:.*]], ptr noalias
|
|
!CHECK: %[[TID_LOCAL:.*]] = alloca i32
|
|
!CHECK: %[[TID:.*]] = load i32, ptr %[[TID_ADDR]]
|
|
!CHECK: store i32 %[[TID]], ptr %[[TID_LOCAL]]
|
|
!CHECK: %[[F_priv:.*]] = alloca ptr
|
|
!CHECK: %[[I_priv:.*]] = alloca i32
|
|
|
|
!CHECK: omp.par.region:
|
|
|
|
!CHECK: omp.reduction.init:
|
|
!CHECK: store ptr %{{.*}}, ptr %[[F_priv]]
|
|
!CHECK: store i32 0, ptr %[[I_priv]]
|
|
!CHECK: br label %[[MALLOC_BB:.*]]
|
|
|
|
!CHECK: [[MALLOC_BB]]:
|
|
!CHECK-NOT: omp.par.{{.*}}:
|
|
!CHECK: call ptr @malloc(i{{(32)|(64)}} 80)
|
|
|
|
!CHECK: %[[RED_ARR_0:.*]] = getelementptr inbounds [2 x ptr], ptr %red.array, i64 0, i64 0
|
|
!CHECK: store ptr %[[F_priv]], ptr %[[RED_ARR_0:.*]]
|
|
!CHECK: %[[RED_ARR_1:.*]] = getelementptr inbounds [2 x ptr], ptr %red.array, i64 0, i64 1
|
|
!CHECK: store ptr %[[I_priv]], ptr %[[RED_ARR_1]]
|
|
|
|
!CHECK: omp.par.pre_finalize: ; preds = %reduce.finalize
|
|
!CHECK: %{{.*}} = load ptr, ptr %[[F_priv]]
|
|
!CHECK: br label %omp.reduction.cleanup
|
|
|
|
!CHECK: omp.reduction.cleanup:
|
|
!CHECK: br i1 %{{.*}}, label %[[OMP_FREE:.*]], label %{{.*}}
|
|
|
|
!CHECK: [[OMP_FREE]]:
|
|
!CHECK: call void @free
|