[flang-commits] [PATCH] D110856: [flang][NFC] Add debug dump method to evaluate::Expr and semantics::Symbol
Jean Perier via Phabricator via flang-commits
flang-commits at lists.llvm.org
Thu Sep 30 14:27:13 PDT 2021
This revision was automatically updated to reflect the committed changes.
Closed by commit rGfdcbb540fc5f: [flang][NFC] Add debug dump method to evaluate::Expr and semantics::Symbol (authored by jeanPerier).
Repository:
rG LLVM Github Monorepo
CHANGES SINCE LAST ACTION
https://reviews.llvm.org/D110856/new/
https://reviews.llvm.org/D110856
Files:
flang/include/flang/Evaluate/expression.h
flang/include/flang/Semantics/symbol.h
flang/lib/Evaluate/expression.cpp
flang/lib/Semantics/symbol.cpp
Index: flang/lib/Semantics/symbol.cpp
===================================================================
--- flang/lib/Semantics/symbol.cpp
+++ flang/lib/Semantics/symbol.cpp
@@ -535,6 +535,10 @@
return os;
}
+#if !defined(NDEBUG) || defined(LLVM_ENABLE_DUMP)
+void Symbol::dump() const { llvm::errs() << *this << '\n'; }
+#endif
+
// Output a unique name for a scope by qualifying it with the names of
// parent scopes. For scopes without corresponding symbols, use the kind
// with an index (e.g. Block1, Block2, etc.).
Index: flang/lib/Evaluate/expression.cpp
===================================================================
--- flang/lib/Evaluate/expression.cpp
+++ flang/lib/Evaluate/expression.cpp
@@ -111,6 +111,12 @@
return left().GetType().value();
}
+#if !defined(NDEBUG) || defined(LLVM_ENABLE_DUMP)
+template <typename A> LLVM_DUMP_METHOD void ExpressionBase<A>::dump() const {
+ llvm::errs() << "Expr is <{" << AsFortran() << "}>\n";
+}
+#endif
+
// Equality testing
bool ImpliedDoIndex::operator==(const ImpliedDoIndex &that) const {
Index: flang/include/flang/Semantics/symbol.h
===================================================================
--- flang/include/flang/Semantics/symbol.h
+++ flang/include/flang/Semantics/symbol.h
@@ -657,6 +657,9 @@
const DerivedTypeSpec *GetParentTypeSpec(const Scope * = nullptr) const;
SemanticsContext &GetSemanticsContext() const;
+#if !defined(NDEBUG) || defined(LLVM_ENABLE_DUMP)
+ LLVM_DUMP_METHOD void dump() const;
+#endif
private:
const Scope *owner_;
Index: flang/include/flang/Evaluate/expression.h
===================================================================
--- flang/include/flang/Evaluate/expression.h
+++ flang/include/flang/Evaluate/expression.h
@@ -93,6 +93,9 @@
std::optional<DynamicType> GetType() const;
int Rank() const;
std::string AsFortran() const;
+#if !defined(NDEBUG) || defined(LLVM_ENABLE_DUMP)
+ LLVM_DUMP_METHOD void dump() const;
+#endif
llvm::raw_ostream &AsFortran(llvm::raw_ostream &) const;
static Derived Rewrite(FoldingContext &, Derived &&);
};
-------------- next part --------------
A non-text attachment was scrubbed...
Name: D110856.376370.patch
Type: text/x-patch
Size: 2102 bytes
Desc: not available
URL: <http://lists.llvm.org/pipermail/flang-commits/attachments/20210930/59663d9e/attachment.bin>
More information about the flang-commits
mailing list