From: Richard Kreckel <Richard.Kreckel@uni-mainz.de>
Date: Tue, 18 Apr 2000 13:46:03 +0000 (+0000)
Subject: - Overwritten: pseries::printtree().
X-Git-Tag: release_0-6-0~20
X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=commitdiff_plain;h=80b2042a896022bc5d774b27aa9f56a42a082a6f

- Overwritten: pseries::printtree().
---

diff --git a/ginac/pseries.cpp b/ginac/pseries.cpp
index 035551d8..277cef18 100644
--- a/ginac/pseries.cpp
+++ b/ginac/pseries.cpp
@@ -178,6 +178,23 @@ void pseries::printraw(ostream &os) const
 	os << ")";
 }
 
+void pseries::printtree(ostream & os, unsigned indent) const
+{
+    debugmsg("pseries printtree",LOGLEVEL_PRINT);
+    os << string(indent,' ') << "pseries " 
+       << ", hash=" << hashvalue << " (0x" << hex << hashvalue << dec << ")"
+       << ", flags=" << flags << endl;
+    for (unsigned i=0; i<seq.size(); ++i) {
+        seq[i].rest.printtree(os,indent+delta_indent);
+        seq[i].coeff.printtree(os,indent+delta_indent);
+        if (i!=seq.size()-1) {
+            os << string(indent+delta_indent,' ') << "-----" << endl;
+        }
+    }
+    var.printtree(os, indent+delta_indent);
+    point.printtree(os, indent+delta_indent);
+}
+
 unsigned pseries::nops(void) const
 {
     return seq.size();
diff --git a/ginac/pseries.h b/ginac/pseries.h
index db79e141..9346c255 100644
--- a/ginac/pseries.h
+++ b/ginac/pseries.h
@@ -57,6 +57,7 @@ public:
     basic *duplicate() const;
     void print(ostream &os, unsigned upper_precedence=0) const;
     void printraw(ostream &os) const;
+    void printtree(ostream & os, unsigned indent) const;
     unsigned nops(void) const;
     ex op(int i) const;
     ex &let_op(int i);