diff options
Diffstat (limited to 'flang/lib/Semantics/resolve-names-utils.cpp')
| -rw-r--r-- | flang/lib/Semantics/resolve-names-utils.cpp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/flang/lib/Semantics/resolve-names-utils.cpp b/flang/lib/Semantics/resolve-names-utils.cpp index c3be572..2f8e577 100644 --- a/flang/lib/Semantics/resolve-names-utils.cpp +++ b/flang/lib/Semantics/resolve-names-utils.cpp @@ -917,6 +917,7 @@ void MapSubprogramToNewSymbols(const Symbol &oldSymbol, Symbol &newSymbol, if (!dummyArg) { newDetails.add_alternateReturn(); } else if (Symbol *copy{newScope.CopySymbol(*dummyArg)}) { + copy->set(Symbol::Flag::Implicit, false); newDetails.add_dummyArg(*copy); mappings->symbolMap[dummyArg] = copy; } |