[flang-commits] [flang] [flang] harden TypeAndShape for assumed-ranks (PR #96234)

[Peter Klausler via flang-commits]

================
@@ -178,9 +181,11 @@ bool TypeAndShape::IsCompatibleWith(parser::ContextualMessages &messages,
         thatIs, that.AsFortran(), thisIs, AsFortran());
     return false;
   }
-  return omitShapeConformanceCheck ||
-      CheckConformance(messages, shape_, that.shape_, flags, thisIs, thatIs)
-          .value_or(true /*fail only when nonconformance is known now*/);
+  return omitShapeConformanceCheck || (!shape_ && !that.shape_) ||
+      ((shape_ && that.shape_) &&
----------------
klausler wrote:

excess parentheses

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