89       : context_{context}, doConcurrentSourcePosition_{  in DoConcurrentBodyEnforce()
169     context_.SayWithDecl(entity, currentStatementSourcePosition_,  in SayDeallocateWithImpureFinal()
177     context_.SayWithDecl(entity, location,  in SayDeallocateOfPolymorph()
191     const Scope &blockScope{context_.FindScope(endBlockStmt.source)};  in Post()
192     const Scope &doScope{context_.FindScope(doConcurrentSourcePosition_)};  in Post()
252       auto &msg{context_.Say(statementLocation,  in Post()
264     context_  in Post()
277         SayWithDo(context_, currentStatementSourcePosition_,  in Post()
285           SayWithDo(context_, currentStatementSourcePosition_,  in Post()
296         SayWithDo(context_, currentStatementSourcePosition_,  in Post()
310         SayWithDo(context_, currentStatementSourcePosition_,  in Post()
330   SemanticsContext &context_;  member in Fortran::semantics::DoConcurrentBodyEnforce
340       : context_{context},  in DoConcurrentVariableEnforce()
353           context_.SayWithDecl(*symbol, name.source,  in Post()
364   SemanticsContext &context_;  member in Fortran::semantics::DoConcurrentVariableEnforce
373       : context_{context}, kind_{kind} {}  in DoContext()
382       context_.ActivateIndexVar(GetDoVariable(doConstruct), IndexVarKind::DO);  in DefineDoVariables()
393       context_.DeactivateIndexVar(GetDoVariable(doConstruct));  in ResetDoVariables()
403       context_.ActivateIndexVar(std::get<parser::Name>(control.t), kind_);  in ActivateIndexVars()
409       context_.DeactivateIndexVar(std::get<parser::Name>(control.t));  in DeactivateIndexVars()
468     context_.Say(sourceLocation, "DO controls should be INTEGER"_err_en_US);  in SayBadDoControl()
472     const bool warn{context_.warnOnNonstandardUsage() ||  in CheckDoControl()
473         context_.ShouldWarn(common::LanguageFeature::RealDoControls)};  in CheckDoControl()
477       context_.Say(sourceLocation, "DO controls should be INTEGER"_port_en_US);  in CheckDoControl()
487         context_.Say(  in CheckDoVariable()
505     if (const SomeExpr * expr{GetExpr(context_, scalarExpression)}) {  in CheckDoExpression()
524         context_.Say(bounds.step->thing.value().source,  in CheckDoNormal()
536     DoConcurrentBodyEnforce doConcurrentBodyEnforce{context_, doStmt.source};  in CheckDoConcurrent()
539     LabelEnforce doConcurrentLabelEnforce{context_,  in CheckDoConcurrent()
557         context_.FindScope(currentStatementSourcePosition_).parent()};  in GatherLocals()
576     if (const auto *expr{GetExpr(context_, expression)}) {  in GatherSymbolsFromExpression()
590         context_.SayWithDecl(ref, parser::Unwrap<parser::Expr>(mask)->source,  in CheckMaskIsPure()
603         context_.SayWithDecl(ref, refPosition, std::move(errorMessage),  in CheckNoCollisions()
649           context_.Say(currentStatementSourcePosition_,  in CheckDefaultNoneImpliesExplicitLocality()
658           context_, currentStatementSourcePosition_};  in CheckDefaultNoneImpliesExplicitLocality()
688             context_.Say(expr.source,  in CheckConcurrentHeader()
729     if (auto bad{FindImpureCall(context_.foldingContext(), x)}) {  in CheckForImpureCall()
730       context_.Say(  in CheckForImpureCall()
738     SymbolVector indexVars{context_.GetIndexVars(IndexVarKind::FORALL)};  in CheckForallIndexesUsed()
773           context_.Say("FORALL index variable '%s' not used on left-hand side"  in CheckForallIndexesUsed()
786   SemanticsContext &context_;  member in Fortran::semantics::DoContext
792   DoContext doContext{context_, IndexVarKind::DO};  in Enter()
797   DoContext doContext{context_, IndexVarKind::DO};  in Leave()
803   DoContext doContext{context_, IndexVarKind::FORALL};  in Enter()
807   DoContext doContext{context_, IndexVarKind::FORALL};  in Leave()
813   DoContext doContext{context_, IndexVarKind::FORALL};  in Enter()
817   DoContext doContext{context_, IndexVarKind::FORALL};  in Leave()
822   DoContext doContext{context_, IndexVarKind::FORALL};  in Leave()
838   context_  in SayBadLeave()
911   const ConstructStack &stack{context_.constructStack()};  in CheckNesting()
925     context_.Say("No matching construct for EXIT statement"_err_en_US);  in CheckNesting()
927     context_.Say("No matching DO construct for CYCLE statement"_err_en_US);  in CheckNesting()
943   context_.CheckIndexVarRedefine(variable);  in Leave()
986           CheckIfArgIsDoVar(checkedArg, parsedExpr->value().source, context_);  in Leave()
997     context_.CheckIndexVarRedefine(newunit->v.thing.thing);  in Leave()
1026     if (const SomeExpr * expr{GetExpr(context_, parsedExpr)}) {  in Leave()
1029         CheckIfArgIsDoVar(*argRef, parsedExpr.source, context_);  in Leave()
1039     context_.CheckIndexVarRedefine(scalar.thing.thing);  in Leave()
1046     context_.CheckIndexVarRedefine(size->v.thing.thing);  in Leave()
1053   context_.CheckIndexVarRedefine(name.source, *name.symbol);  in Leave()
1057   context_.CheckIndexVarRedefine(statVariable.v.thing.thing);  in Leave()