Skip to content

Commit cc02e50

Browse files
authored
Revert "[Flang] Update the fix of PR 80738 to cover generic interface… (#81321)
… inside modules (#81087)" This reverts commit 0802596. See comments in PR #81087 for a test case that shows why I'm reverting.
1 parent c344953 commit cc02e50

File tree

1 file changed

+3
-4
lines changed

1 file changed

+3
-4
lines changed

flang/lib/Semantics/resolve-names.cpp

Lines changed: 3 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -5648,10 +5648,9 @@ void DeclarationVisitor::Post(const parser::ProcDecl &x) {
56485648
const auto &name{std::get<parser::Name>(x.t)};
56495649
const Symbol *procInterface{nullptr};
56505650
if (interfaceName_) {
5651-
Symbol *ultimate{&interfaceName_->symbol->GetUltimate()};
5652-
procInterface = ultimate->has<GenericDetails>()
5653-
? ultimate->get<GenericDetails>().specific()
5654-
: ultimate;
5651+
procInterface = interfaceName_->symbol->has<GenericDetails>()
5652+
? interfaceName_->symbol->get<GenericDetails>().specific()
5653+
: interfaceName_->symbol;
56555654
}
56565655
auto attrs{HandleSaveName(name.source, GetAttrs())};
56575656
DerivedTypeDetails *dtDetails{nullptr};

0 commit comments

Comments
 (0)