rename isUnordered

Author: ergawy

flang/lib/Lower/Bridge.cpp

@@ -97,7 +97,8 @@ struct IncrementLoopInfo {
                              bool isUnordered = false)
       : loopVariableSym{&sym}, lowerExpr{Fortran::semantics::GetExpr(lower)},
         upperExpr{Fortran::semantics::GetExpr(upper)},
-        stepExpr{Fortran::semantics::GetExpr(step)}, isUnordered{isUnordered} {}
+        stepExpr{Fortran::semantics::GetExpr(step)}, isConcurrent{isUnordered} {
+  }
 
   IncrementLoopInfo(IncrementLoopInfo &&) = default;
   IncrementLoopInfo &operator=(IncrementLoopInfo &&x) = default;
@@ -120,7 +121,7 @@ struct IncrementLoopInfo {
   const Fortran::lower::SomeExpr *upperExpr;
   const Fortran::lower::SomeExpr *stepExpr;
   const Fortran::lower::SomeExpr *maskExpr = nullptr;
-  bool isUnordered; // do concurrent, forall
+  bool isConcurrent;
   llvm::SmallVector<const Fortran::semantics::Symbol *> localSymList;
   llvm::SmallVector<const Fortran::semantics::Symbol *> localInitSymList;
   llvm::SmallVector<
@@ -2317,11 +2318,11 @@ class FirConverter : public Fortran::lower::AbstractConverter {
     bool genDoConcurrent = false;
 
     for (IncrementLoopInfo &info : incrementLoopNestInfo) {
-      genDoConcurrent = info.isStructured() && info.isUnordered;
+      genDoConcurrent = info.isStructured() && info.isConcurrent;
 
       if (!genDoConcurrent)
         info.loopVariable = genLoopVariableAddress(loc, *info.loopVariableSym,
-                                                   info.isUnordered);
+                                                   info.isConcurrent);
 
       if (!getLoweringOptions().getIntegerWrapAround()) {
         iofBackup = builder->getIntegerOverflowFlags();
@@ -2449,7 +2450,7 @@ class FirConverter : public Fortran::lower::AbstractConverter {
 
       for (IncrementLoopInfo &info : llvm::reverse(incrementLoopNestInfo)) {
         info.loopVariable = genLoopVariableAddress(loc, *info.loopVariableSym,
-                                                   info.isUnordered);
+                                                   info.isConcurrent);
       }
 
       builder->setInsertionPointToEnd(loopWrapperOp.getBody());
@@ -2512,7 +2513,7 @@ class FirConverter : public Fortran::lower::AbstractConverter {
       IncrementLoopInfo &info = *it;
       if (info.isStructured()) {
         // End fir.do_concurent.loop.
-        if (info.isUnordered) {
+        if (info.isConcurrent) {
           builder->setInsertionPointAfter(info.loopOp->getParentOp());
           continue;
         }