From 68b809c28ee0a5c6a382d5253b6928fb29786e38 Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Wed, 23 Oct 1996 22:43:00 +0000
Subject: [PATCH] lilypond-0.0.5

---
 molecule.cc | 15 ++++++++++++++-
 1 file changed, 14 insertions(+), 1 deletion(-)

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();
+}
-- 
2.39.5