[flang-commits] [flang] [flang] Do not stop on mismatched DATA substring length (PR #69336)

[Peter Klausler via flang-commits]

================
@@ -457,10 +457,11 @@ bool DataInitializationCompiler<DSV>::InitElement(
             folded.AsFortran(), DescribeElement());
       } else if (status == evaluate::InitialImage::OutOfRange) {
         OutOfRangeError();
-      } else if (status == evaluate::InitialImage::SizeMismatch) {
+      } else if (status == evaluate::InitialImage::LengthMismatch) {
----------------
klausler wrote:

Ok, just fall into the CHECK then.

https://github.com/llvm/llvm-project/pull/69336