Lines Matching refs:stmt
870 mlir::Value genIfCondition(const A *stmt, bool negate = false) { in genIfCondition() argument
876 std::get<Fortran::parser::ScalarLogicalExpr>(stmt->t)), in genIfCondition()
896 void genFIR(const Fortran::parser::CallStmt &stmt) { in genFIR() argument
899 setCurrentPosition(stmt.v.source); in genFIR()
900 assert(stmt.typedCall && "Call was not analyzed"); in genFIR()
903 *this, *stmt.typedCall, explicitIterSpace, implicitIterSpace, in genFIR()
913 std::get<std::list<Fortran::parser::ActualArgSpec>>(stmt.v.t)) { in genFIR()
926 void genFIR(const Fortran::parser::ComputedGotoStmt &stmt) { in genFIR() argument
932 std::get<Fortran::parser::ScalarIntExpr>(stmt.t)), in genFIR()
939 std::get<std::list<Fortran::parser::Label>>(stmt.t)) { in genFIR()
948 void genFIR(const Fortran::parser::ArithmeticIfStmt &stmt) { in genFIR() argument
953 Fortran::semantics::GetExpr(std::get<Fortran::parser::Expr>(stmt.t)), in genFIR()
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()
996 void genFIR(const Fortran::parser::AssignedGotoStmt &stmt) { in genFIR() argument
1011 *std::get<Fortran::parser::Name>(stmt.t).symbol; in genFIR()
1030 std::get<std::list<Fortran::parser::Label>>(stmt.t)) { in genFIR()
1419 void genNestedStatement(const Fortran::parser::Statement<A> &stmt) { in genNestedStatement() argument
1420 setCurrentPosition(stmt.source); in genNestedStatement()
1421 genFIR(stmt.statement); in genNestedStatement()
1554 void genFIR(const Fortran::parser::ForallAssignmentStmt &stmt) { in genFIR() argument
1555 std::visit([&](const auto &x) { genFIR(x); }, stmt.u); in genFIR()
1577 void genFIR(const Fortran::parser::ForallStmt &stmt) { in genFIR() argument
1578 prepareExplicitSpace(stmt); in genFIR()
1581 stmt.t) in genFIR()
1584 Fortran::parser::ForallAssignmentStmt>>(stmt.t) in genFIR()
1612 void genFIR(const Fortran::parser::ForallConstructStmt &stmt) { in genFIR() argument
1615 stmt.t) in genFIR()
1687 void genFIR(const Fortran::parser::SelectCaseStmt &stmt) { in genFIR() argument
1693 std::get<Fortran::parser::Scalar<Fortran::parser::Expr>>(stmt.t)); in genFIR()
1877 if (auto *stmt = e.getIf<Fortran::parser::AssociateStmt>()) { in genFIR() local
1882 std::get<std::list<Fortran::parser::Association>>(stmt->t)) { in genFIR()
1914 void genFIR(const Fortran::parser::ChangeTeamStmt &stmt) { in genFIR() argument
1917 void genFIR(const Fortran::parser::EndChangeTeamStmt &stmt) { in genFIR() argument
1958 void genFIR(const Fortran::parser::BackspaceStmt &stmt) { in genFIR() argument
1959 mlir::Value iostat = genBackspaceStatement(*this, stmt); in genFIR()
1960 genIoConditionBranches(getEval(), stmt.v, iostat); in genFIR()
1962 void genFIR(const Fortran::parser::CloseStmt &stmt) { in genFIR() argument
1963 mlir::Value iostat = genCloseStatement(*this, stmt); in genFIR()
1964 genIoConditionBranches(getEval(), stmt.v, iostat); in genFIR()
1966 void genFIR(const Fortran::parser::EndfileStmt &stmt) { in genFIR() argument
1967 mlir::Value iostat = genEndfileStatement(*this, stmt); in genFIR()
1968 genIoConditionBranches(getEval(), stmt.v, iostat); in genFIR()
1970 void genFIR(const Fortran::parser::FlushStmt &stmt) { in genFIR() argument
1971 mlir::Value iostat = genFlushStatement(*this, stmt); in genFIR()
1972 genIoConditionBranches(getEval(), stmt.v, iostat); in genFIR()
1974 void genFIR(const Fortran::parser::InquireStmt &stmt) { in genFIR() argument
1975 mlir::Value iostat = genInquireStatement(*this, stmt); in genFIR()
1977 std::get_if<std::list<Fortran::parser::InquireSpec>>(&stmt.u)) in genFIR()
1980 void genFIR(const Fortran::parser::OpenStmt &stmt) { in genFIR() argument
1981 mlir::Value iostat = genOpenStatement(*this, stmt); in genFIR()
1982 genIoConditionBranches(getEval(), stmt.v, iostat); in genFIR()
1984 void genFIR(const Fortran::parser::PrintStmt &stmt) { in genFIR() argument
1985 genPrintStatement(*this, stmt); in genFIR()
1987 void genFIR(const Fortran::parser::ReadStmt &stmt) { in genFIR() argument
1988 mlir::Value iostat = genReadStatement(*this, stmt); in genFIR()
1989 genIoConditionBranches(getEval(), stmt.controls, iostat); in genFIR()
1991 void genFIR(const Fortran::parser::RewindStmt &stmt) { in genFIR() argument
1992 mlir::Value iostat = genRewindStatement(*this, stmt); in genFIR()
1993 genIoConditionBranches(getEval(), stmt.v, iostat); in genFIR()
1995 void genFIR(const Fortran::parser::WaitStmt &stmt) { in genFIR() argument
1996 mlir::Value iostat = genWaitStatement(*this, stmt); in genFIR()
1997 genIoConditionBranches(getEval(), stmt.v, iostat); in genFIR()
1999 void genFIR(const Fortran::parser::WriteStmt &stmt) { in genFIR() argument
2000 mlir::Value iostat = genWriteStatement(*this, stmt); in genFIR()
2001 genIoConditionBranches(getEval(), stmt.controls, iostat); in genFIR()
2059 void genFIR(const Fortran::parser::AllocateStmt &stmt) { in genFIR() argument
2060 Fortran::lower::genAllocateStmt(*this, stmt, toLocation()); in genFIR()
2063 void genFIR(const Fortran::parser::DeallocateStmt &stmt) { in genFIR() argument
2064 Fortran::lower::genDeallocateStmt(*this, stmt, toLocation()); in genFIR()
2071 void genFIR(const Fortran::parser::NullifyStmt &stmt) { in genFIR() argument
2073 for (auto &pointerObject : stmt.v) { in genFIR()
2084 void genFIR(const Fortran::parser::EventPostStmt &stmt) { in genFIR() argument
2085 genEventPostStatement(*this, stmt); in genFIR()
2088 void genFIR(const Fortran::parser::EventWaitStmt &stmt) { in genFIR() argument
2089 genEventWaitStatement(*this, stmt); in genFIR()
2092 void genFIR(const Fortran::parser::FormTeamStmt &stmt) { in genFIR() argument
2093 genFormTeamStatement(*this, getEval(), stmt); in genFIR()
2096 void genFIR(const Fortran::parser::LockStmt &stmt) { in genFIR() argument
2097 genLockStatement(*this, stmt); in genFIR()
2415 Fortran::parser::AssignmentStmt> &stmt) { in genFIR() argument
2416 genNestedStatement(stmt); in genFIR()
2419 &stmt) { genNestedStatement(stmt); }, in genFIR() argument
2425 void genFIR(const Fortran::parser::WhereConstructStmt &stmt) { in genFIR() argument
2427 std::get<Fortran::parser::LogicalExpr>(stmt.t))); in genFIR()
2438 void genFIR(const Fortran::parser::MaskedElsewhereStmt &stmt) { in genFIR() argument
2440 std::get<Fortran::parser::LogicalExpr>(stmt.t))); in genFIR()
2450 void genFIR(const Fortran::parser::ElsewhereStmt &stmt) { in genFIR() argument
2457 void genFIR(const Fortran::parser::WhereStmt &stmt) { in genFIR() argument
2459 const auto &assign = std::get<Fortran::parser::AssignmentStmt>(stmt.t); in genFIR()
2462 std::get<Fortran::parser::LogicalExpr>(stmt.t))); in genFIR()
2467 void genFIR(const Fortran::parser::PointerAssignmentStmt &stmt) { in genFIR() argument
2468 genAssignment(*stmt.typedAssignment->v); in genFIR()
2471 void genFIR(const Fortran::parser::AssignmentStmt &stmt) { in genFIR() argument
2472 genAssignment(*stmt.typedAssignment->v); in genFIR()
2475 void genFIR(const Fortran::parser::SyncAllStmt &stmt) { in genFIR() argument
2476 genSyncAllStatement(*this, stmt); in genFIR()
2479 void genFIR(const Fortran::parser::SyncImagesStmt &stmt) { in genFIR() argument
2480 genSyncImagesStatement(*this, stmt); in genFIR()
2483 void genFIR(const Fortran::parser::SyncMemoryStmt &stmt) { in genFIR() argument
2484 genSyncMemoryStatement(*this, stmt); in genFIR()
2487 void genFIR(const Fortran::parser::SyncTeamStmt &stmt) { in genFIR() argument
2488 genSyncTeamStatement(*this, stmt); in genFIR()
2491 void genFIR(const Fortran::parser::UnlockStmt &stmt) { in genFIR() argument
2492 genUnlockStatement(*this, stmt); in genFIR()
2495 void genFIR(const Fortran::parser::AssignStmt &stmt) { in genFIR() argument
2497 *std::get<Fortran::parser::Name>(stmt.t).symbol; in genFIR()
2500 loc, genType(symbol), std::get<Fortran::parser::Label>(stmt.t)); in genFIR()
2511 void genFIR(const Fortran::parser::PauseStmt &stmt) { in genFIR() argument
2512 genPauseStatement(*this, stmt); in genFIR()
2516 void genFIR(const Fortran::parser::FailImageStmt &stmt) { in genFIR() argument
2521 void genFIR(const Fortran::parser::StopStmt &stmt) { in genFIR() argument
2522 genStopStatement(*this, stmt); in genFIR()
2525 void genFIR(const Fortran::parser::ReturnStmt &stmt) { in genFIR() argument
2534 if (stmt.v) { in genFIR()
2543 Fortran::semantics::GetExpr(*stmt.v); in genFIR()
2606 eval.visit([&](const auto &stmt) { genFIR(stmt); }); in genFIR() argument
3036 void analyzeExplicitSpace(const Fortran::parser::ForallAssignmentStmt &stmt) { in analyzeExplicitSpace() argument
3037 std::visit([&](const auto &s) { analyzeExplicitSpace(s); }, stmt.u); in analyzeExplicitSpace()
3090 void analyzeExplicitSpace(const Fortran::parser::MaskedElsewhereStmt &stmt) { in analyzeExplicitSpace() argument
3092 std::get<Fortran::parser::LogicalExpr>(stmt.t)); in analyzeExplicitSpace()
3102 void analyzeExplicitSpace(const Fortran::parser::WhereStmt &stmt) { in analyzeExplicitSpace() argument
3104 std::get<Fortran::parser::LogicalExpr>(stmt.t)); in analyzeExplicitSpace()
3108 std::get<Fortran::parser::AssignmentStmt>(stmt.t).typedAssignment->v; in analyzeExplicitSpace()