We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 8792ba4 commit 8fd9427Copy full SHA for 8fd9427
flang/lib/Evaluate/check-expression.cpp
@@ -1501,7 +1501,8 @@ class CopyInOutExplicitInterface {
1501
if (dummyObj_.ignoreTKR.test(common::IgnoreTKR::Type)) {
1502
return false;
1503
}
1504
- if (auto actualType{characteristics::TypeAndShape::Characterize(actual_, fc_)}) {
+ if (auto actualType{
1505
+ characteristics::TypeAndShape::Characterize(actual_, fc_)}) {
1506
bool actualIsPolymorphic{actualType->type().IsPolymorphic()};
1507
bool dummyIsPolymorphic{dummyObj_.type.type().IsPolymorphic()};
1508
if (actualIsPolymorphic && !dummyIsPolymorphic) {
0 commit comments