Skip to content

Commit 58bcb4b

Browse files
committed
rename isUnordered
1 parent 2b9751c commit 58bcb4b

File tree

1 file changed

+7
-6
lines changed

1 file changed

+7
-6
lines changed

flang/lib/Lower/Bridge.cpp

Lines changed: 7 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -97,7 +97,8 @@ struct IncrementLoopInfo {
9797
bool isUnordered = false)
9898
: loopVariableSym{&sym}, lowerExpr{Fortran::semantics::GetExpr(lower)},
9999
upperExpr{Fortran::semantics::GetExpr(upper)},
100-
stepExpr{Fortran::semantics::GetExpr(step)}, isUnordered{isUnordered} {}
100+
stepExpr{Fortran::semantics::GetExpr(step)}, isConcurrent{isUnordered} {
101+
}
101102

102103
IncrementLoopInfo(IncrementLoopInfo &&) = default;
103104
IncrementLoopInfo &operator=(IncrementLoopInfo &&x) = default;
@@ -120,7 +121,7 @@ struct IncrementLoopInfo {
120121
const Fortran::lower::SomeExpr *upperExpr;
121122
const Fortran::lower::SomeExpr *stepExpr;
122123
const Fortran::lower::SomeExpr *maskExpr = nullptr;
123-
bool isUnordered; // do concurrent, forall
124+
bool isConcurrent; // do concurrent, forall
124125
llvm::SmallVector<const Fortran::semantics::Symbol *> localSymList;
125126
llvm::SmallVector<const Fortran::semantics::Symbol *> localInitSymList;
126127
llvm::SmallVector<
@@ -2293,11 +2294,11 @@ class FirConverter : public Fortran::lower::AbstractConverter {
22932294
bool genDoConcurrent = false;
22942295

22952296
for (IncrementLoopInfo &info : incrementLoopNestInfo) {
2296-
genDoConcurrent = info.isStructured() && info.isUnordered;
2297+
genDoConcurrent = info.isStructured() && info.isConcurrent;
22972298

22982299
if (!genDoConcurrent)
22992300
info.loopVariable = genLoopVariableAddress(loc, *info.loopVariableSym,
2300-
info.isUnordered);
2301+
info.isConcurrent);
23012302

23022303
if (!getLoweringOptions().getIntegerWrapAround()) {
23032304
iofBackup = builder->getIntegerOverflowFlags();
@@ -2425,7 +2426,7 @@ class FirConverter : public Fortran::lower::AbstractConverter {
24252426

24262427
for (IncrementLoopInfo &info : llvm::reverse(incrementLoopNestInfo)) {
24272428
info.loopVariable = genLoopVariableAddress(loc, *info.loopVariableSym,
2428-
info.isUnordered);
2429+
info.isConcurrent);
24292430
}
24302431

24312432
builder->setInsertionPointToEnd(loopWrapperOp.getBody());
@@ -2488,7 +2489,7 @@ class FirConverter : public Fortran::lower::AbstractConverter {
24882489
IncrementLoopInfo &info = *it;
24892490
if (info.isStructured()) {
24902491
// End fir.do_concurent.loop.
2491-
if (info.isUnordered) {
2492+
if (info.isConcurrent) {
24922493
builder->setInsertionPointAfter(info.loopOp->getParentOp());
24932494
continue;
24942495
}

0 commit comments

Comments
 (0)