556       Fortran::lower::pft::Evaluation &eval,  in collectSymbolSet()  argument
566     Fortran::lower::pft::visitAllSymbols(eval, addToList);  in collectSymbolSet()
742   mlir::Block *blockOfLabel(Fortran::lower::pft::Evaluation &eval,  in blockOfLabel()  argument
745         eval.getOwningProcedure()->labelEvaluationMap;  in blockOfLabel()
898     Fortran::lower::pft::Evaluation &eval = getEval();  in genFIR()  local
918         blockList.push_back(blockOfLabel(eval, altReturn->v));  in genFIR()
921     blockList.push_back(eval.nonNopSuccessor().block); // default = fallthrough  in genFIR()
928     Fortran::lower::pft::Evaluation &eval = getEval();  in genFIR()  local
941       blockList.push_back(blockOfLabel(eval, label));  in genFIR()
943     blockList.push_back(eval.nonNopSuccessor().block); // default  in genFIR()
950     Fortran::lower::pft::Evaluation &eval = getEval();  in genFIR()  local
967       blockList.push_back(blockOfLabel(eval, std::get<1>(stmt.t)));  in genFIR()
970       blockList.push_back(blockOfLabel(eval, std::get<3>(stmt.t)));  in genFIR()
972       blockList.push_back(blockOfLabel(eval, std::get<2>(stmt.t)));  in genFIR()
987     genFIRConditionalBranch(cond1, blockOfLabel(eval, std::get<1>(stmt.t)),  in genFIR()
992     genFIRConditionalBranch(cond2, blockOfLabel(eval, std::get<3>(stmt.t)),  in genFIR()
993                             blockOfLabel(eval, std::get<2>(stmt.t)));  in genFIR()
1007     Fortran::lower::pft::Evaluation &eval = getEval();  in genFIR()  local
1009         eval.getOwningProcedure()->assignSymbolLabelMap;  in genFIR()
1026       blockList.push_back(blockOfLabel(eval, label));  in genFIR()
1043     blockList.push_back(eval.nonNopSuccessor().block); // default  in genFIR()
1083     Fortran::lower::pft::Evaluation &eval = getEval();  in genFIR()  local
1084     bool unstructuredContext = eval.lowerAsUnstructured();  in genFIR()
1086         eval.getFirstNestedEvaluation();  in genFIR()
1167     for (Fortran::lower::pft::Evaluation &e : eval.getNestedEvaluations())  in genFIR()
1359     Fortran::lower::pft::Evaluation &eval = getEval();  in genFIR()  local
1360     if (eval.lowerAsStructured()) {  in genFIR()
1363       for (Fortran::lower::pft::Evaluation &e : eval.getNestedEvaluations()) {  in genFIR()
1390     for (Fortran::lower::pft::Evaluation &e : eval.getNestedEvaluations()) {  in genFIR()
1688     Fortran::lower::pft::Evaluation &eval = getEval();  in genFIR()  local
1720     mlir::Block *defaultBlock = eval.parentConstruct->constructExit->block;  in genFIR()
1734     for (Fortran::lower::pft::Evaluation *e = eval.controlSuccessor; e;  in genFIR()
1772       defaultBlock = eval.parentConstruct->constructExit->block;  in genFIR()
1781     if (!isLogicalSelector && !isCharSelector && eval.lowerAsStructured()) {  in genFIR()
1875     Fortran::lower::pft::Evaluation &eval = getEval();  in genFIR()  local
1876     for (Fortran::lower::pft::Evaluation &e : eval.getNestedEvaluations()) {  in genFIR()
1878         if (eval.lowerAsUnstructured())  in genFIR()
1890         if (eval.lowerAsUnstructured())  in genFIR()
2005   void genIoConditionBranches(Fortran::lower::pft::Evaluation &eval,  in genIoConditionBranches()  argument
2016                        endBlock = blockOfLabel(eval, label.v);  in genIoConditionBranches()
2019                        eorBlock = blockOfLabel(eval, label.v);  in genIoConditionBranches()
2022                        errBlock = blockOfLabel(eval, label.v);  in genIoConditionBranches()
2045       blockList.push_back(eval.nonNopSuccessor().block);  in genIoConditionBranches()
2050       blockList.push_back(eval.nonNopSuccessor().block);  in genIoConditionBranches()
2594   void genFIR(Fortran::lower::pft::Evaluation &eval,  in genFIR()  argument
2599       maybeStartBlock(eval.isConstruct() && eval.lowerAsStructured()  in genFIR()
2600                           ? eval.getFirstNestedEvaluation().block  in genFIR()
2601                           : eval.block);  in genFIR()
2604     setCurrentEval(eval);  in genFIR()
2605     setCurrentPosition(eval.position);  in genFIR()
2606     eval.visit([&](const auto &stmt) { genFIR(stmt); });  in genFIR()
2611       if (eval.isActionStmt())  in genFIR()
2612         successor = eval.controlSuccessor;  in genFIR()
2613       else if (eval.isConstruct() &&  in genFIR()
2614                eval.getLastNestedEvaluation()  in genFIR()
2616         successor = eval.constructExit;  in genFIR()
2799     for (Fortran::lower::pft::Evaluation &eval : evaluationList) {  in createEmptyBlocks()
2800       if (eval.isNewBlock)  in createEmptyBlocks()
2801         eval.block = builder->createBlock(region);  in createEmptyBlocks()
2802       if (eval.isConstruct() || eval.isDirective()) {  in createEmptyBlocks()
2803         if (eval.lowerAsUnstructured()) {  in createEmptyBlocks()
2804           createEmptyBlocks(eval.getNestedEvaluations());  in createEmptyBlocks()
2805         } else if (eval.hasNestedEvaluations()) {  in createEmptyBlocks()
2808               eval.getFirstNestedEvaluation();  in createEmptyBlocks()
2922       for (Fortran::lower::pft::Evaluation &eval : funit.evaluationList)  in lowerFunc()
2923         genFIR(eval);  in lowerFunc()
2943       for (auto &eval : mod.evaluationList)  in lowerModuleDeclScope()  local
2944         genFIR(eval);  in lowerModuleDeclScope()
2978   void setCurrentEval(Fortran::lower::pft::Evaluation &eval) {  in setCurrentEval()  argument
2979     evalPtr = &eval;  in setCurrentEval()