Lines Matching defs:subscripts
267 // subscripts are in hand.
271 int subscripts{static_cast<int>(ref.size())};
272 if (subscripts == 0) {
274 } else if (subscripts != symbolRank) {
276 Say("Reference to rank-%d object '%s' has %d subscripts"_err_en_US,
277 symbolRank, symbol.name(), subscripts);
306 // Applies subscripts to a data reference.
308 DataRef &&dataRef, std::vector<Subscript> &&subscripts) {
309 if (subscripts.empty()) {
315 return CompleteSubscripts(ArrayRef{symbol, std::move(subscripts)});
319 ArrayRef{std::move(c), std::move(subscripts)});
537 if (arrElement.subscripts.size() == 1) {
539 &arrElement.subscripts.front().u)}) {
598 // we can be sure that there are no following subscripts (yet).
1024 "Whole assumed-size array '%s' may not appear here without subscripts"_err_en_US,
1282 std::vector<Subscript> subscripts;
1285 subscripts.emplace_back(std::move(*subscript));
1290 return !error ? subscripts : std::vector<Subscript>{};
1300 if (ae.subscripts.empty()) {
1318 std::move(*dataRef), AnalyzeSectionSubscripts(ae.subscripts));
1323 // error was reported: analyze subscripts without reporting more errors
1325 AnalyzeSectionSubscripts(ae.subscripts);
1330 // on any trailing (co)subscripts.
1472 std::vector<Subscript> subscripts;
1475 subscripts = std::move(aRef->subscript());
1491 Say("Base of coindexed named object has subscripts or cosubscripts"_err_en_US);
1527 std::move(subscripts), std::move(cosubscripts)}});
3755 // reference with no subscripts, or subscripts on a scalar, because it will
3757 // subscript list due to bad subscripts error recovery or because the