@@ -2582,12 +2582,12 @@ class ArrayExprLowering {
2582
2582
}
2583
2583
} else {
2584
2584
// A regular scalar index, which does not yield an array
2585
- // section. Use a degenerate slice operation
2586
- // `(e:undef:undef)` in this dimension as a placeholder.
2587
- // This does not necessarily change the rank of the original
2588
- // array, so the iteration space must also be extended to
2589
- // include this expression in this dimension to adjust to
2590
- // the array's declared rank.
2585
+ // section. Use a degenerate slice operation `(e:undef:undef)`
2586
+ // in this dimension as a placeholder. This does not
2587
+ // necessarily change the rank of the original array, so the
2588
+ // iteration space must also be extended to include this
2589
+ // expression in this dimension to adjust to the array's
2590
+ // declared rank.
2591
2591
auto base = x.base ();
2592
2592
ScalarExprLowering sel{loc, converter, symMap, stmtCtx};
2593
2593
auto exv = base.IsSymbol () ? sel.gen (base.GetFirstSymbol ())
@@ -2741,10 +2741,9 @@ class ArrayExprLowering {
2741
2741
return [=](IterSpace iters) { return lambda (iters); };
2742
2742
}
2743
2743
2744
- // / The `Ev::Component` structure is tailmost down to head, so the
2745
- // / expression <code>a%b%c</code> will be presented as <code>(component
2746
- // / (dataref (component (dataref (symbol 'a)) (symbol 'b))) (symbol
2747
- // / 'c))</code>.
2744
+ // / The `Ev::Component` structure is tailmost down to head, so the expression
2745
+ // / <code>a%b%c</code> will be presented as <code>(component (dataref
2746
+ // / (component (dataref (symbol 'a)) (symbol 'b))) (symbol 'c))</code>.
2748
2747
void buildComponentsPath (llvm::SmallVectorImpl<mlir::Value> &components,
2749
2748
mlir::Type &recTy,
2750
2749
const Fortran::evaluate::DataRef &dr) {
0 commit comments