Skip to content

Commit 8acda01

Browse files
ronliebronlieb
committed
Revert "[Flang][OpenMP] Make implicitly captured scalars fully firstprivatized (llvm#147442)"
This reverts commit cc2a385.
1 parent 4967c71 commit 8acda01

13 files changed

+100
-227
lines changed

‎flang/lib/Lower/OpenMP/DataSharingProcessor.cpp

Lines changed: 23 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -46,9 +46,25 @@ bool DataSharingProcessor::OMPConstructSymbolVisitor::isSymbolDefineBy(
4646
static bool isConstructWithTopLevelTarget(lower::pft::Evaluation &eval) {
4747
const auto *ompEval = eval.getIf<parser::OpenMPConstruct>();
4848
if (ompEval) {
49-
auto dir = parser::omp::GetOmpDirectiveName(ompEval).v;
50-
if (llvm::omp::topTargetSet.test(dir))
49+
auto dir = parser::omp::GetOmpDirectiveName(*ompEval).v;
50+
switch (dir) {
51+
case llvm::omp::Directive::OMPD_target:
52+
case llvm::omp::Directive::OMPD_target_loop:
53+
case llvm::omp::Directive::OMPD_target_parallel_do:
54+
case llvm::omp::Directive::OMPD_target_parallel_do_simd:
55+
case llvm::omp::Directive::OMPD_target_parallel_loop:
56+
case llvm::omp::Directive::OMPD_target_teams_distribute:
57+
case llvm::omp::Directive::OMPD_target_teams_distribute_parallel_do:
58+
case llvm::omp::Directive::OMPD_target_teams_distribute_parallel_do_simd:
59+
case llvm::omp::Directive::OMPD_target_teams_distribute_simd:
60+
case llvm::omp::Directive::OMPD_target_teams_loop:
61+
case llvm::omp::Directive::OMPD_target_simd:
5162
return true;
63+
break;
64+
default:
65+
return false;
66+
break;
67+
}
5268
}
5369
return false;
5470
}
@@ -57,12 +73,12 @@ DataSharingProcessor::DataSharingProcessor(
5773
lower::AbstractConverter &converter, semantics::SemanticsContext &semaCtx,
5874
const List<Clause> &clauses, lower::pft::Evaluation &eval,
5975
bool shouldCollectPreDeterminedSymbols, bool useDelayedPrivatization,
60-
lower::SymMap &symTable, bool isTargetPrivatization)
76+
lower::SymMap &symTable, bool isTargetPrivitization)
6177
: converter(converter), semaCtx(semaCtx),
6278
firOpBuilder(converter.getFirOpBuilder()), clauses(clauses), eval(eval),
6379
shouldCollectPreDeterminedSymbols(shouldCollectPreDeterminedSymbols),
6480
useDelayedPrivatization(useDelayedPrivatization), symTable(symTable),
65-
isTargetPrivatization(isTargetPrivatization), visitor(semaCtx) {
81+
isTargetPrivitization(isTargetPrivitization), visitor(semaCtx) {
6682
eval.visit([&](const auto &functionParserNode) {
6783
parser::Walk(functionParserNode, visitor);
6884
});
@@ -73,11 +89,11 @@ DataSharingProcessor::DataSharingProcessor(lower::AbstractConverter &converter,
7389
lower::pft::Evaluation &eval,
7490
bool useDelayedPrivatization,
7591
lower::SymMap &symTable,
76-
bool isTargetPrivatization)
92+
bool isTargetPrivitization)
7793
: DataSharingProcessor(converter, semaCtx, {}, eval,
7894
/*shouldCollectPreDeterminedSymols=*/false,
7995
useDelayedPrivatization, symTable,
80-
isTargetPrivatization) {}
96+
isTargetPrivitization) {}
8197

8298
void DataSharingProcessor::processStep1() {
8399
collectSymbolsForPrivatization();
@@ -549,7 +565,7 @@ void DataSharingProcessor::collectSymbols(
549565
// and not be added/captured by later directives. Parallel regions
550566
// will likely want the same captures to be shared and for SIMD it's
551567
// illegal to have firstprivate clauses.
552-
if (isConstructWithTopLevelTarget(eval) && !isTargetPrivatization &&
568+
if (isConstructWithTopLevelTarget(eval) && !isTargetPrivitization &&
553569
sym->test(semantics::Symbol::Flag::OmpFirstPrivate)) {
554570
return false;
555571
}

‎flang/lib/Lower/OpenMP/DataSharingProcessor.h

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -93,7 +93,7 @@ class DataSharingProcessor {
9393
bool useDelayedPrivatization;
9494
llvm::SmallSet<const semantics::Symbol *, 16> mightHaveReadHostSym;
9595
lower::SymMap &symTable;
96-
bool isTargetPrivatization;
96+
bool isTargetPrivitization;
9797
OMPConstructSymbolVisitor visitor;
9898
bool privatizationDone = false;
9999

@@ -133,13 +133,13 @@ class DataSharingProcessor {
133133
lower::pft::Evaluation &eval,
134134
bool shouldCollectPreDeterminedSymbols,
135135
bool useDelayedPrivatization, lower::SymMap &symTable,
136-
bool isTargetPrivatization = false);
136+
bool isTargetPrivitization = false);
137137

138138
DataSharingProcessor(lower::AbstractConverter &converter,
139139
semantics::SemanticsContext &semaCtx,
140140
lower::pft::Evaluation &eval,
141141
bool useDelayedPrivatization, lower::SymMap &symTable,
142-
bool isTargetPrivatization = false);
142+
bool isTargetPrivitization = false);
143143

144144
// Privatisation is split into 3 steps:
145145
//

‎flang/lib/Lower/OpenMP/OpenMP.cpp

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2390,6 +2390,9 @@ static bool isDuplicateMappedSymbol(
23902390
concatSyms.append(mappedSyms.begin(), mappedSyms.end());
23912391

23922392
auto checkSymbol = [&](const semantics::Symbol &checkSym) {
2393+
if (llvm::is_contained(concatSyms, &checkSym))
2394+
return true;
2395+
23932396
return std::any_of(concatSyms.begin(), concatSyms.end(),
23942397
[&](auto v) { return v->GetUltimate() == checkSym; });
23952398
};
@@ -2432,7 +2435,8 @@ genTargetOp(lower::AbstractConverter &converter, lower::SymMap &symTable,
24322435
lower::omp::isLastItemInQueue(item, queue),
24332436
/*useDelayedPrivatization=*/true, symTable,
24342437
/*isTargetPrivitization=*/true);
2435-
dsp.processStep1(&clauseOps);
2438+
dsp.processStep1();
2439+
dsp.processStep2(&clauseOps);
24362440

24372441
// 5.8.1 Implicit Data-Mapping Attribute Rules
24382442
// The following code follows the implicit data-mapping rules to map all the

‎flang/lib/Optimizer/OpenMP/MapsForPrivatizedSymbols.cpp

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -58,7 +58,7 @@ class MapsForPrivatizedSymbolsPass
5858
// Check if a value of type `type` can be passed to the kernel by value.
5959
// All kernel parameters are of pointer type, so if the value can be
6060
// represented inside of a pointer, then it can be passed by value.
61-
auto canPassByValue = [&](mlir::Type type) {
61+
auto isLiteralType = [&](mlir::Type type) {
6262
const mlir::DataLayout &dl = builder.getDataLayout();
6363
mlir::Type ptrTy = mlir::LLVM::LLVMPointerType::get(builder.getContext());
6464
uint64_t ptrSize = dl.getTypeSize(ptrTy);
@@ -112,7 +112,7 @@ class MapsForPrivatizedSymbolsPass
112112
mlir::omp::VariableCaptureKind::ByRef;
113113
if (fir::isa_trivial(fir::unwrapRefType(varPtr.getType())) ||
114114
fir::isa_char(fir::unwrapRefType(varPtr.getType()))) {
115-
if (canPassByValue(fir::unwrapRefType(varPtr.getType()))) {
115+
if (isLiteralType(fir::unwrapRefType(varPtr.getType()))) {
116116
captureKind = mlir::omp::VariableCaptureKind::ByCopy;
117117
}
118118
}

‎flang/lib/Semantics/resolve-directives.cpp

Lines changed: 12 additions & 14 deletions
Original file line numberDiff line numberDiff line change
@@ -823,10 +823,11 @@ class OmpAttributeVisitor : DirectiveAttributeVisitor<llvm::omp::Directive> {
823823
Symbol::Flag::OmpLastPrivate, Symbol::Flag::OmpReduction,
824824
Symbol::Flag::OmpLinear};
825825

826-
Symbol::Flags dataMappingAttributeFlags{Symbol::Flag::OmpMapTo,
827-
Symbol::Flag::OmpMapFrom, Symbol::Flag::OmpMapToFrom,
828-
Symbol::Flag::OmpMapStorage, Symbol::Flag::OmpMapDelete,
829-
Symbol::Flag::OmpIsDevicePtr, Symbol::Flag::OmpHasDeviceAddr};
826+
Symbol::Flags dataMappingAttributeFlags {
827+
Symbol::Flag::OmpMapTo, Symbol::Flag::OmpMapFrom,
828+
Symbol::Flag::OmpMapToFrom, Symbol::Flag::OmpMapStorage,
829+
Symbol::Flag::OmpMapDelete, Symbol::Flag::OmpIsDevicePtr,
830+
Symbol::Flag::OmpHasDeviceAddr};
830831

831832
Symbol::Flags privateDataSharingAttributeFlags{Symbol::Flag::OmpPrivate,
832833
Symbol::Flag::OmpFirstPrivate, Symbol::Flag::OmpLastPrivate};
@@ -2417,20 +2418,17 @@ static bool IsTargetCaptureImplicitlyFirstprivatizeable(const Symbol &symbol,
24172418
std::map<parser::OmpVariableCategory::Value,
24182419
parser::OmpDefaultmapClause::ImplicitBehavior>
24192420
defaultMap) {
2420-
// If a Defaultmap clause is present for the current target scope, and it has
2421-
// specified behaviour other than Firstprivate for scalars then we exit early,
2422-
// as it overrides the implicit Firstprivatization of scalars OpenMP rule.
24232421
if (!defaultMap.empty()) {
24242422
if (llvm::is_contained(
2425-
defaultMap, parser::OmpVariableCategory::Value::All) &&
2426-
defaultMap[parser::OmpVariableCategory::Value::All] !=
2423+
defaultMap, parser::OmpVariableCategory::Value::Scalar) &&
2424+
defaultMap[parser::OmpVariableCategory::Value::Scalar] !=
24272425
parser::OmpDefaultmapClause::ImplicitBehavior::Firstprivate) {
24282426
return false;
24292427
}
24302428

24312429
if (llvm::is_contained(
2432-
defaultMap, parser::OmpVariableCategory::Value::Scalar) &&
2433-
defaultMap[parser::OmpVariableCategory::Value::Scalar] !=
2430+
defaultMap, parser::OmpVariableCategory::Value::All) &&
2431+
defaultMap[parser::OmpVariableCategory::Value::All] !=
24342432
parser::OmpDefaultmapClause::ImplicitBehavior::Firstprivate) {
24352433
return false;
24362434
}
@@ -2443,7 +2441,7 @@ static bool IsTargetCaptureImplicitlyFirstprivatizeable(const Symbol &symbol,
24432441
// TODO: Relax restriction as we progress privitization and further
24442442
// investigate the flags we can intermix with.
24452443
if (!(dsa & (dataSharingAttributeFlags | dataMappingAttributeFlags))
2446-
.none() ||
2444+
.none() ||
24472445
!checkSym.flags().none() || semantics::IsAssumedShape(checkSym) ||
24482446
semantics::IsAllocatableOrPointer(checkSym)) {
24492447
return false;
@@ -2566,7 +2564,7 @@ void OmpAttributeVisitor::CreateImplicitSymbols(const Symbol *symbol) {
25662564

25672565
bool taskGenDir = llvm::omp::taskGeneratingSet.test(dirContext.directive);
25682566
bool targetDir = llvm::omp::allTargetSet.test(dirContext.directive);
2569-
bool parallelDir = llvm::omp::topParallelSet.test(dirContext.directive);
2567+
bool parallelDir = llvm::omp::allParallelSet.test(dirContext.directive);
25702568
bool teamsDir = llvm::omp::allTeamsSet.test(dirContext.directive);
25712569
bool isStaticStorageDuration = IsSymbolStaticStorageDuration(*symbol);
25722570

@@ -2626,7 +2624,7 @@ void OmpAttributeVisitor::CreateImplicitSymbols(const Symbol *symbol) {
26262624
// 4) not mapped target variable -> firstprivate
26272625
// - i.e. implicit, but meets OpenMP specification rules for
26282626
// firstprivate "promotion"
2629-
if (enableDelayedPrivatizationStaging &&
2627+
if (/*enableDelayedPrivatizationStaging && */
26302628
IsTargetCaptureImplicitlyFirstprivatizeable(*symbol, prevDSA,
26312629
dataSharingAttributeFlags, dataMappingAttributeFlags,
26322630
dirContext.defaultMap)) {

‎flang/test/Integration/OpenMP/map-types-and-sizes.f90

Lines changed: 4 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -6,17 +6,14 @@
66
! added to this directory and sub-directories.
77
!===----------------------------------------------------------------------===!
88

9-
!RUN: %flang_fc1 -emit-llvm -fopenmp -mmlir --enable-delayed-privatization-staging=false -fopenmp-version=51 -fopenmp-targets=amdgcn-amd-amdhsa %s -o - | FileCheck %s --check-prefixes=CHECK,CHECK-NO-FPRIV
10-
!RUN: %flang_fc1 -emit-llvm -fopenmp -mmlir --enable-delayed-privatization-staging=true -fopenmp-version=51 -fopenmp-targets=amdgcn-amd-amdhsa %s -o - | FileCheck %s --check-prefixes=CHECK,CHECK-FPRIV
11-
9+
!RUN: %flang_fc1 -emit-llvm -fopenmp -fopenmp-version=51 -fopenmp-targets=amdgcn-amd-amdhsa %s -o - | FileCheck %s
1210

1311
!===============================================================================
1412
! Check MapTypes for target implicit captures
1513
!===============================================================================
1614

1715
!CHECK: @.offload_sizes = private unnamed_addr constant [1 x i64] [i64 4]
18-
!CHECK-FPRIV: @.offload_maptypes = private unnamed_addr constant [1 x i64] [i64 289]
19-
!CHECK-NO-FPRIV: @.offload_maptypes = private unnamed_addr constant [1 x i64] [i64 800]
16+
!CHECK: @.offload_maptypes = private unnamed_addr constant [1 x i64] [i64 289]
2017
subroutine mapType_scalar
2118
integer :: a
2219
!$omp target
@@ -375,8 +372,7 @@ subroutine mapType_nested_derived_type_member_idx()
375372
end subroutine
376373

377374
!CHECK: @.offload_sizes{{.*}} = private unnamed_addr constant [2 x i64] [i64 8, i64 4]
378-
!CHECK-FPRIV: @.offload_maptypes{{.*}} = private unnamed_addr constant [2 x i64] [i64 544, i64 289]
379-
!CHECK-NO-FPRIV: @.offload_maptypes{{.*}} = private unnamed_addr constant [2 x i64] [i64 544, i64 800]
375+
!CHECK: @.offload_maptypes{{.*}} = private unnamed_addr constant [2 x i64] [i64 544, i64 289]
380376
subroutine mapType_c_ptr
381377
use iso_c_binding, only : c_ptr, c_loc
382378
type(c_ptr) :: a
@@ -387,8 +383,7 @@ subroutine mapType_c_ptr
387383
end subroutine mapType_c_ptr
388384

389385
!CHECK: @.offload_sizes{{.*}} = private unnamed_addr constant [1 x i64] [i64 1]
390-
!CHECK-FPRIV: @.offload_maptypes{{.*}} = private unnamed_addr constant [1 x i64] [i64 289]
391-
!CHECK-NO-FPRIV: @.offload_maptypes{{.*}} = private unnamed_addr constant [1 x i64] [i64 800]
386+
!CHECK: @.offload_maptypes{{.*}} = private unnamed_addr constant [1 x i64] [i64 289]
392387
subroutine mapType_char
393388
character :: a
394389
!$omp target

‎flang/test/Lower/OpenMP/DelayedPrivatization/target-private-implicit-scalar-map.f90

Lines changed: 0 additions & 42 deletions
This file was deleted.

‎flang/test/Lower/OpenMP/DelayedPrivatization/target-private-multiple-variables.f90

Lines changed: 7 additions & 13 deletions
Original file line numberDiff line numberDiff line change
@@ -37,10 +37,6 @@ end subroutine target_allocatable
3737

3838
! Test the privatizer for `character`
3939
!
40-
! CHECK: omp.private {type = firstprivate}
41-
! CHECK-SAME: @[[FIRSTPRIVATE_SCALAR_SYM:[^[:space:]]+mapped_var[^[:space:]]+]]
42-
! CHECK-SAME: : [[FIRSTPRIVATE_TYPE:i32]] copy {
43-
4440
! CHECK: omp.private {type = private}
4541
! CHECK-SAME: @[[CHAR_PRIVATIZER_SYM:[^[:space:]]+char_var[^[:space:]]+]]
4642
! CHECK-SAME: : [[CHAR_TYPE:!fir.boxchar<1>]] init {
@@ -82,7 +78,6 @@ end subroutine target_allocatable
8278

8379
! Test the privatizer for `real(:)`'s lower bound
8480
!
85-
8681
! CHECK: omp.private {type = private}
8782
! CHECK-SAME: @[[LB_PRIVATIZER_SYM:[^[:space:]]+lb[^[:space:]]+]]
8883
! CHECK-SAME: : [[LB_TYPE:i64]]{{$}}
@@ -145,29 +140,28 @@ end subroutine target_allocatable
145140
! CHECK: %[[REAL_ARR_ALLOC:.*]] = fir.alloca !fir.array<?xf32>, {{.*}} {bindc_name = "real_arr", {{.*}}}
146141
! CHECK: %[[REAL_ARR_DECL:.*]]:2 = hlfir.declare %[[REAL_ARR_ALLOC]]({{.*}})
147142
! CHECK: fir.store %[[REAL_ARR_DECL]]#0 to %[[REAL_ARR_DESC_ALLOCA]] : !fir.ref<!fir.box<!fir.array<?xf32>>>
143+
! CHECK: %[[MAPPED_MI0:.*]] = omp.map.info var_ptr(%[[MAPPED_DECL]]#1 : !fir.ref<i32>, i32) {{.*}}
148144
! CHECK: %[[ALLOC_VAR_MEMBER:.*]] = omp.map.info var_ptr(%[[ALLOC_VAR_DECL]]#0 : !fir.ref<!fir.box<!fir.heap<i32>>>, i32)
149145
! CHECK: %[[ALLOC_VAR_MAP:.*]] = omp.map.info var_ptr(%[[ALLOC_VAR_DECL]]#0 : !fir.ref<!fir.box<!fir.heap<i32>>>, !fir.box<!fir.heap<i32>>) {{.*}} members(%[[ALLOC_VAR_MEMBER]] :
150146
! CHECK: %[[REAL_ARR_MEMBER:.*]] = omp.map.info var_ptr(%[[REAL_ARR_DESC_ALLOCA]] : !fir.ref<!fir.box<!fir.array<?xf32>>>, f32)
151147
! CHECK: %[[REAL_ARR_DESC_MAP:.*]] = omp.map.info var_ptr(%[[REAL_ARR_DESC_ALLOCA]] : !fir.ref<!fir.box<!fir.array<?xf32>>>, !fir.box<!fir.array<?xf32>>) {{.*}} members(%[[REAL_ARR_MEMBER]] :
152148
! CHECK: fir.store %[[CHAR_VAR_DECL]]#0 to %[[CHAR_VAR_DESC_ALLOCA]] : !fir.ref<!fir.boxchar<1>>
153149
! CHECK: %[[CHAR_VAR_DESC_MAP:.*]] = omp.map.info var_ptr(%[[CHAR_VAR_DESC_ALLOCA]] : !fir.ref<!fir.boxchar<1>>, !fir.boxchar<1>)
154-
! CHECK: %[[MAPPED_MI0:.*]] = omp.map.info var_ptr(%[[MAPPED_DECL]]#0 : !fir.ref<i32>, i32) {{.*}}
155150
! CHECK: omp.target
156151
! CHECK-SAME: map_entries(
152+
! CHECK-SAME: %[[MAPPED_MI0]] -> %[[MAPPED_ARG0:[^,]+]],
157153
! CHECK-SAME: %[[ALLOC_VAR_MAP]] -> %[[MAPPED_ARG1:[^,]+]]
158154
! CHECK-SAME: %[[REAL_ARR_DESC_MAP]] -> %[[MAPPED_ARG2:[^,]+]]
159155
! CHECK-SAME: %[[CHAR_VAR_DESC_MAP]] -> %[[MAPPED_ARG3:.[^,]+]]
160-
! CHECK-SAME: %[[MAPPED_MI0]] -> %[[MAPPED_ARG0:[^,]+]]
161-
! CHECK-SAME: !fir.ref<!fir.box<!fir.heap<i32>>>, !fir.ref<!fir.box<!fir.array<?xf32>>>, !fir.ref<!fir.boxchar<1>>, !fir.ref<i32>, !fir.llvm_ptr<!fir.ref<i32>>, !fir.llvm_ptr<!fir.ref<!fir.array<?xf32>>>, !fir.ref<!fir.boxchar<1>>
156+
! CHECK-SAME: !fir.ref<i32>, !fir.ref<!fir.box<!fir.heap<i32>>>, !fir.ref<!fir.box<!fir.array<?xf32>>>, !fir.ref<!fir.boxchar<1>>, !fir.llvm_ptr<!fir.ref<i32>>, !fir.llvm_ptr<!fir.ref<!fir.array<?xf32>>>
162157
! CHECK-SAME: private(
163-
! CHECK-SAME: @[[ALLOC_PRIVATIZER_SYM]] %{{[^[:space:]]+}}#0 -> %[[ALLOC_ARG:[^,]+]] [map_idx=0],
158+
! CHECK-SAME: @[[ALLOC_PRIVATIZER_SYM]] %{{[^[:space:]]+}}#0 -> %[[ALLOC_ARG:[^,]+]] [map_idx=1],
164159
! CHECK-SAME: @[[REAL_PRIVATIZER_SYM]] %{{[^[:space:]]+}}#0 -> %[[REAL_ARG:[^,]+]],
165160
! CHECK-SAME: @[[LB_PRIVATIZER_SYM]] %{{[^[:space:]]+}}#0 -> %[[LB_ARG:[^,]+]],
166-
! CHECK-SAME: @[[ARR_PRIVATIZER_SYM]] %{{[^[:space:]]+}} -> %[[ARR_ARG:[^,]+]] [map_idx=1],
161+
! CHECK-SAME: @[[ARR_PRIVATIZER_SYM]] %{{[^[:space:]]+}} -> %[[ARR_ARG:[^,]+]] [map_idx=2],
167162
! CHECK-SAME: @[[COMP_PRIVATIZER_SYM]] %{{[^[:space:]]+}}#0 -> %[[COMP_ARG:[^,]+]],
168-
! CHECK-SAME: @[[CHAR_PRIVATIZER_SYM]] %{{[^[:space:]]+}}#0 -> %[[CHAR_ARG:[^,]+]] [map_idx=2]
169-
! CHECK-SAME: @[[FIRSTPRIVATE_SCALAR_SYM]] %{{[^[:space:]]+}}#0 -> %[[FP_SCALAR_ARG:[^,]+]] [map_idx=3] :
170-
! CHECK-SAME: !fir.ref<!fir.box<!fir.heap<i32>>>, !fir.ref<f32>, !fir.ref<i64>, !fir.ref<!fir.box<!fir.array<?xf32>>>, !fir.ref<complex<f32>>, !fir.boxchar<1>, !fir.ref<i32>)
163+
! CHECK-SAME: @[[CHAR_PRIVATIZER_SYM]] %{{[^[:space:]]+}}#0 -> %[[CHAR_ARG:[^,]+]] [map_idx=3] :
164+
! CHECK-SAME: !fir.ref<!fir.box<!fir.heap<i32>>>, !fir.ref<f32>, !fir.ref<i64>, !fir.ref<!fir.box<!fir.array<?xf32>>>, !fir.ref<complex<f32>>, !fir.boxchar<1>) {
171165
! CHECK-NOT: fir.alloca
172166
! CHECK: hlfir.declare %[[ALLOC_ARG]]
173167
! CHECK: hlfir.declare %[[REAL_ARG]]

0 commit comments

Comments
 (0)