Lines Matching refs:context_
117 : context_{context}, source_{context.GetContextualMessages().at()}, in ArgumentAnalyzer()
121 : context_{context}, source_{source}, isProcedureCall_{isProcedureCall} {} in ArgumentAnalyzer()
162 context_.context().languageFeatures().GetNames(opr), msg); in TryDefinedOp()
189 ExpressionAnalyzer &context_; member in Fortran::evaluate::ArgumentAnalyzer
212 } else if (auto interface{context_.intrinsics().IsSpecificIntrinsicFunction( in Designate()
227 if (!context_.HasError(last) && !context_.HasError(symbol)) { in Designate()
232 context_.SetError(last); in Designate()
594 auto &defaults{context_.defaultKinds()}; in Analyze()
630 context_.ShouldWarn( in Analyze()
771 if (context_.HasError(n.symbol)) { // includes case of no symbol in Analyze()
784 context_.FindScope(n.source))}) { in Analyze()
1046 if (!context_.HasError(symbol)) { in Analyze()
1054 context_.SetError(*symbol); in Analyze()
1120 if (!base || !sym || context_.HasError(sym)) { in Analyze()
1143 CHECK(context_.AnyFatalError() || !foldingContext_.messages().empty()); in Analyze()
1751 if (const auto *currScope{context_.globalScope().FindScope(source)}) { in Analyze()
1786 const auto &innermost{context_.FindScope(expr.source)}; in Analyze()
1993 if (context_.HasError(sym)) { in AnalyzeProcedureComponentRef()
2049 CHECK(context_.AnyFatalError()); in AnalyzeProcedureComponentRef()
2105 if (context_.HasError(symbol)) { in ResolveForward()
2115 semantics::ResolveSpecificationParts(context_, symbol); in ResolveForward()
2123 context_.SetError(symbol); in ResolveForward()
2129 context_.SetError(symbol); in ResolveForward()
2150 if (context_.intrinsics().Probe( in ResolveGeneric()
2168 ProcedureDesignator{specific}, context_.foldingContext())}) { in ResolveGeneric()
2219 for (const std::string &n : GetAllNames(context_, symbol.name())) { in ResolveGeneric()
2253 auto rename{context_.SaveTempName( in AccessSpecific()
2298 if (context_.HasError(symbol)) { in GetCalleeAndArguments()
2322 if (std::optional<SpecificCall> specificCall{context_.intrinsics().Probe( in GetCalleeAndArguments()
2345 if (!context_.HasError(*resolution)) { in GetCalleeAndArguments()
2491 semantics::Scope &scope{context_.FindScope(name->source)}; in Analyze()
2504 if (!context_.HasError(symbol)) { in Analyze()
2509 context_.SetError(symbol); in Analyze()
2546 if (!context_.AnyFatalError()) { in Analyze()
2638 proc, context_.foldingContext())}; in CheckCall()
2660 context_.FindScope(callSite), treatExternalAsImplicit, in CheckCall()
2665 context_.FindScope(callSite))}) { in CheckCall()
3052 FixMisparsedFunctionReference(context_, x.u); in ExprOrVariable()
3088 if (!context_.AnyFatalError()) { in ExprOrVariable()
3112 FixMisparsedFunctionReference(context_, var->u); in Analyze()
3134 if (context_.AnyFatalError()) { in Analyze()
3193 return context_.GetDefaultKind(category); in GetDefaultKind()
3276 int kind{context_.GetDefaultKind(category)}; in EnforceTypeConstraint()
3329 context_.intrinsics().Probe(CallCharacteristics{intrinsic.ToString()}, in MakeFunctionRef()
3341 if (MaybeExpr expr{context_.Analyze(x)}) { in Analyze()
3349 context_.SayAt(x, "Assignment to constant '%s' is not allowed"_err_en_US, in Analyze()
3352 auto *msg{context_.SayAt(x, in Analyze()
3360 context_.SayAt(x, "Assignment to constant '%s' is not allowed"_err_en_US, in Analyze()
3381 context_.Say("alternate return specification may not appear on" in Analyze()
3387 context_.Say("%REF() intrinsic for arguments"_todo_en_US); in Analyze()
3390 context_.Say("%VAL() intrinsic for arguments"_todo_en_US); in Analyze()
3462 auto &foldingContext{context_.GetFoldingContext()}; in CheckConformance()
3484 context_.Say( in CheckForNullPointer()
3499 context_.Say(error, ToUpperCase(opr), TypeAsFortran(0), TypeAsFortran(1)); in TryDefinedOp()
3507 auto restorer{context_.GetContextualMessages().DiscardMessages()}; in TryDefinedOp()
3511 const auto &scope{context_.context().FindScope(source_)}; in TryDefinedOp()
3515 if (auto result{context_.AnalyzeDefinedOp(name, GetActuals())}) { in TryDefinedOp()
3532 context_.Say(error, ToUpperCase(opr), TypeAsFortran(0), TypeAsFortran(1)); in TryDefinedOp()
3535 context_.Say( in TryDefinedOp()
3546 auto restorer{context_.GetContextualMessages().DiscardMessages()}; in TryDefinedOp()
3562 return context_.MakeFunctionRef( in TryBoundOp()
3582 auto restorer{context_.GetContextualMessages().SetLocation(source_)}; in TryDefinedAssignment()
3584 if (context_.inWhereBody() && !procRef->proc().IsElemental()) { // C1032 in TryDefinedAssignment()
3585 context_.Say( in TryDefinedAssignment()
3589 context_.CheckCall(source_, procRef->proc(), procRef->arguments()); in TryDefinedAssignment()
3603 if (!context_.context().languageFeatures().IsEnabled( in OkLogicalIntegerAssignment()
3617 if (context_.context().languageFeatures().ShouldWarn( in OkLogicalIntegerAssignment()
3619 context_.Say(std::move(*msg)); in OkLogicalIntegerAssignment()
3625 auto restorer{context_.GetContextualMessages().DiscardMessages()}; in GetDefinedAssignmentProc()
3629 const auto &scope{context_.context().FindScope(source_)}; in GetDefinedAssignmentProc()
3632 auto pair{context_.ResolveGeneric(*symbol, actuals_, noAdjustment, true)}; in GetDefinedAssignmentProc()
3636 context_.EmitGenericResolutionError(*symbol, pair.second); in GetDefinedAssignmentProc()
3688 context_.SayAt(expr.source, in AnalyzeExpr()
3696 context_.SayAt(expr.source, in AnalyzeExpr()
3711 auto restorer{context_.AllowWholeAssumedSizeArray()}; in AnalyzeExprOrWholeAssumedSizeArray()
3712 return context_.Analyze(expr); in AnalyzeExprOrWholeAssumedSizeArray()
3715 return context_.Analyze(expr); in AnalyzeExprOrWholeAssumedSizeArray()
3740 auto pair{context_.ResolveGeneric(*symbol, actuals_, adjustment, false)}; in FindBoundOp()
3742 context_.EmitGenericResolutionError(*symbol, pair.second); in FindBoundOp()
3783 int kind{context_.context().GetDefaultKind(TypeCategory::Real)}; in ConvertBOZ()
3789 int kind{context_.context().GetDefaultKind(TypeCategory::Integer)}; in ConvertBOZ()
3804 context_.Say("No intrinsic or user-defined %s matches " in SayNoMatch()
3808 context_.Say("No intrinsic or user-defined %s matches " in SayNoMatch()
3816 context_.Say("No intrinsic or user-defined %s matches " in SayNoMatch()
3821 context_.Say("No intrinsic or user-defined %s matches " in SayNoMatch()
3825 context_.Say("No intrinsic or user-defined %s matches " in SayNoMatch()
3830 context_.Say("No intrinsic or user-defined %s matches " in SayNoMatch()
3875 ExprChecker::ExprChecker(SemanticsContext &context) : context_{context} {} in ExprChecker()
3895 return !context_.AnyFatalError(); in Walk()