From: fred <fred>
Date: Wed, 23 Oct 1996 22:43:00 +0000 (+0000)
Subject: lilypond-0.0.5
X-Git-Tag: release/1.5.59~7033
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=68b809c28ee0a5c6a382d5253b6928fb29786e38;p=lilypond.git

lilypond-0.0.5
---

diff --git a/molecule.cc b/molecule.cc
index 7b8a752423..5ab384f87d 100644
--- a/molecule.cc
+++ b/molecule.cc
@@ -3,6 +3,13 @@
 #include "string.hh"
 #include "molecule.hh"
 #include "symbol.hh"
+#include "debug.hh"
+
+void
+Atom::print() const
+{
+    mtor << "texstring: " <<sym.tex<<"\n";    
+}
 
 Box
 Atom::extent() const
@@ -29,7 +36,6 @@ Atom::TeXstring() const
     return s;
 }
 
-/****************************************************************/
 
 String
 Molecule::TeXstring() const
@@ -111,3 +117,10 @@ Molecule::Molecule(const Molecule&s)
 {
     add(s);
 }
+
+void
+Molecule::print() const
+{
+    for (PCursor<Atom*> c(ats); c.ok(); c++)
+	c->print();
+}