diff options
author | Krzysztof Parzyszek <Krzysztof.Parzyszek@amd.com> | 2025-05-09 07:55:13 -0500 |
---|---|---|
committer | Krzysztof Parzyszek <Krzysztof.Parzyszek@amd.com> | 2025-05-09 07:56:10 -0500 |
commit | 89822ff5a8608570897c21a3c40fb450c53f603f (patch) | |
tree | 13175fc9ffe168eb8e0a1619811988729c0a171a /flang/lib/Semantics/mod-file.cpp | |
parent | bb0a0782ea63e94154d2c8653e0064e4321a1f20 (diff) | |
download | llvm-89822ff5a8608570897c21a3c40fb450c53f603f.zip llvm-89822ff5a8608570897c21a3c40fb450c53f603f.tar.gz llvm-89822ff5a8608570897c21a3c40fb450c53f603f.tar.bz2 |
Revert "[flang][OpenMP] Pass OpenMP version to getOpenMPDirectiveName (#139131)"
This reverts commit 41aa67488c3ca33334ec79fb5216145c3644277c.
Breaks build: https://lab.llvm.org/buildbot/#/builders/140/builds/22826
Diffstat (limited to 'flang/lib/Semantics/mod-file.cpp')
-rw-r--r-- | flang/lib/Semantics/mod-file.cpp | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/flang/lib/Semantics/mod-file.cpp b/flang/lib/Semantics/mod-file.cpp index 12fc553..ee356e5 100644 --- a/flang/lib/Semantics/mod-file.cpp +++ b/flang/lib/Semantics/mod-file.cpp @@ -50,7 +50,7 @@ static void CollectSymbols( const Scope &, SymbolVector &, SymbolVector &, SourceOrderedSymbolSet &); static void PutPassName(llvm::raw_ostream &, const std::optional<SourceName> &); static void PutInit(llvm::raw_ostream &, const Symbol &, const MaybeExpr &, - const parser::Expr *, SemanticsContext &); + const parser::Expr *); static void PutInit(llvm::raw_ostream &, const MaybeIntExpr &); static void PutBound(llvm::raw_ostream &, const Bound &); static void PutShapeSpec(llvm::raw_ostream &, const ShapeSpec &); @@ -605,7 +605,7 @@ void ModFileWriter::PutDECStructure( } decls_ << ref->name(); PutShape(decls_, object->shape(), '(', ')'); - PutInit(decls_, *ref, object->init(), nullptr, context_); + PutInit(decls_, *ref, object->init(), nullptr); emittedDECFields_.insert(*ref); } else if (any) { break; // any later use of this structure will use RECORD/str/ @@ -944,8 +944,7 @@ void ModFileWriter::PutObjectEntity( getSymbolAttrsToWrite(symbol)); PutShape(os, details.shape(), '(', ')'); PutShape(os, details.coshape(), '[', ']'); - PutInit(os, symbol, details.init(), details.unanalyzedPDTComponentInit(), - context_); + PutInit(os, symbol, details.init(), details.unanalyzedPDTComponentInit()); os << '\n'; if (auto tkr{GetIgnoreTKR(symbol)}; !tkr.empty()) { os << "!dir$ ignore_tkr("; @@ -1037,11 +1036,11 @@ void ModFileWriter::PutTypeParam(llvm::raw_ostream &os, const Symbol &symbol) { } void PutInit(llvm::raw_ostream &os, const Symbol &symbol, const MaybeExpr &init, - const parser::Expr *unanalyzed, SemanticsContext &context) { + const parser::Expr *unanalyzed) { if (IsNamedConstant(symbol) || symbol.owner().IsDerivedType()) { const char *assign{symbol.attrs().test(Attr::POINTER) ? "=>" : "="}; if (unanalyzed) { - parser::Unparse(os << assign, *unanalyzed, context.langOptions()); + parser::Unparse(os << assign, *unanalyzed); } else if (init) { init->AsFortran(os << assign); } |