Lines Matching defs:control

270   // C1137 -- No image control statements in a DO CONCURRENT
276 "An image control statement is not allowed in DO CONCURRENT"_err_en_US)};
417 for (const auto &control : controls) {
418 context_.ActivateIndexVar(std::get<parser::Name>(control.t), kind_);
423 for (const auto &control : controls) {
424 context_.DeactivateIndexVar(std::get<parser::Name>(control.t));
510 sourceLocation, "DO control must be an INTEGER variable"_err_en_US);
758 for (const parser::ConcurrentControl &control : controls) {
759 const auto &indexName{std::get<parser::Name>(control.t)};
763 CheckForImpureCall(std::get<1>(control.t), concurrentNesting_);
764 CheckForImpureCall(std::get<2>(control.t), concurrentNesting_);
765 if (const auto &stride{std::get<3>(control.t)}) {
770 for (const parser::ConcurrentControl &control : controls) {
771 HasNoReferences(indexNames, std::get<1>(control.t));
772 HasNoReferences(indexNames, std::get<2>(control.t));
774 std::get<std::optional<parser::ScalarIntExpr>>(control.t)}) {
789 const parser::LoopControl &control, const parser::Block &block) const {
791 std::get<parser::LoopControl::Concurrent>(control.u)};
797 for (const auto &c : GetControls(control)) {
820 void CheckConcurrentLoopControl(const parser::LoopControl &control) const {
822 std::get<parser::LoopControl::Concurrent>(control.u)};
989 // Check that CYCLE and EXIT statements do not cause flow of control to
1181 const auto &control{std::get<parser::IoImpliedDoControl>(outputImpliedDo.t)};
1182 const parser::Name &name{control.name.thing.thing};