Lines Matching defs:at

18 static parser::Message BlameSymbol(parser::CharBlock at,
20   parser::Message message{at, text, original.name(), std::forward<A>(x)...};
51     SourceName at, const Symbol &original, const Symbol &ultimate,
55       return BlameSymbol(at,
98 static std::optional<parser::Message> WhyNotDefinableBase(parser::CharBlock at,
107       return BlameSymbol(at,
110       return BlameSymbol(at,
114       return WhyNotDefinableBase(at, scope, flags, dataRef->GetFirstSymbol(),
123     return BlameSymbol(at, "'%s' is not a variable"_en_US, original);
125     return BlameSymbol(at, "'%s' is protected in this scope"_en_US, original);
129         at, "'%s' is an INTENT(IN) dummy argument"_en_US, original);
141               at, original, ultimate, scope, *pure)}) {
148       return BlameSymbol(at,
156       return BlameSymbol(at,
161         return BlameSymbol(at,
165         return BlameSymbol(at,
171         return BlameSymbol(at,
176       return BlameSymbol(at,
184 static std::optional<parser::Message> WhyNotDefinableLast(parser::CharBlock at,
193       return WhyNotDefinableLast(at, scope, flags, dataRef->GetLastSymbol());
200             at, "'%s' is neither a pointer nor an allocatable"_en_US, original);
203       return BlameSymbol(at, "'%s' is not a pointer"_en_US, original);
209     return BlameSymbol(at,
218               at, "'%s' is polymorphic in a pure subprogram"_en_US, original);
222         return BlameSymbol(at, "'%s' has an impure FINAL procedure '%s'"_en_US,
229             return BlameSymbol(at,
241 static std::optional<parser::Message> WhyNotDefinable(parser::CharBlock at,
245       WhyNotDefinableBase(at, scope, flags, dataRef.GetFirstSymbol(),
250             WhyNotDefinableLast(at, scope, flags, dataRef.GetLastSymbol())}) {
259 std::optional<parser::Message> WhyNotDefinable(parser::CharBlock at,
261   auto whyNotBase{WhyNotDefinableBase(at, scope, flags, original,
264     if (auto whyNotLast{WhyNotDefinableLast(at, scope, flags, original)}) {
314 std::optional<parser::Message> WhyNotDefinable(parser::CharBlock at,
354                       common::UsageWarning::VectorSubscriptFinalization, at,
367           return parser::Message{at,
371         return parser::Message{at,
377       return parser::Message(at,
381     if (auto whyNotDataRef{WhyNotDefinable(at, scope, flags, *dataRef)}) {
386         at, "'%s' is a null pointer"_err_en_US, expr.AsFortran()};
393           return BlameSymbol(at,
399           return WhyNotDefinableBase(at, scope, flags,
403           return WhyNotDefinable(at, scope, flags, *procSym);
408         at, "'%s' is not a definable pointer"_err_en_US, expr.AsFortran()};
411         at, "'%s' is not a variable or pointer"_err_en_US, expr.AsFortran()};