Lines Matching defs:designator
19 #include "flang/Evaluate/fold-designator.h"
120 // Initializes all elements of a designator, which can be an array or section.
123 bool InitElement(const evaluate::OffsetSymbol &, const SomeExpr &designator,
161 const parser::Designator &designator) {
163 { // The out-of-range subscript errors from the designator folder are a
167 expr = exprAnalyzer_.Analyze(designator);
170 parser::CharBlock at{parser::FindSourceLocation(designator)};
253 auto designator{exprAnalyzer_.Designate(evaluate::DataRef{symbol})};
254 CHECK(designator.has_value());
255 return InitDesignator(*designator, symbol.owner());
260 const SomeExpr &designator, const Scope &scope) {
263 while (auto offsetSymbol{folder.FoldDesignator(designator)}) {
267 "DATA statement designator '%s' is out of range"_err_en_US,
271 "DATA statement designator '%s' is out of range"_err_en_US,
272 designator.AsFortran());
275 } else if (!InitElement(*offsetSymbol, designator, scope)) {
313 const evaluate::OffsetSymbol &offsetSymbol, const SomeExpr &designator,
316 const Symbol *lastSymbol{GetLastSymbol(designator)};
349 "DATA statement designator '%s' is out of range for its variable '%s'"_err_en_US,
389 if (CheckPointerAssignment(exprAnalyzer_.context(), designator, *expr,
413 exprAnalyzer_.context(), designator, *expr, scope)) {
423 } else if (auto designatorType{designator.GetType()}) {