From b64c0f12826e32e73a0060282f11c39b6515ce2b Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Sun, 24 Mar 2002 19:50:17 +0000
Subject: [PATCH] lilypond-0.1.1

---
 lily/command-request.cc  | 2 ++
 lily/input-translator.cc | 2 ++
 lily/molecule.cc         | 4 ++++
 3 files changed, 8 insertions(+)

diff --git a/lily/command-request.cc b/lily/command-request.cc
index 0d44ccbd35..cf5ef632f8 100644
--- a/lily/command-request.cc
+++ b/lily/command-request.cc
@@ -186,9 +186,11 @@ Key_change_req::squash_octaves()
 void
 Key_change_req::do_print() const
 {
+#ifndef NPRINT
     for (int i=0; i < melodic_p_arr_.size(); i++) {
 	melodic_p_arr_[i]->print();
     }
+#endif
 }
 
 Key_change_req::Key_change_req()
diff --git a/lily/input-translator.cc b/lily/input-translator.cc
index 748f516bd5..47e93160fb 100644
--- a/lily/input-translator.cc
+++ b/lily/input-translator.cc
@@ -27,6 +27,8 @@ void
 Input_translator::print() const
 {
 #ifndef NPRINT
+    if ( ! check_debug)
+	return ;
     mtor << base_str_ <<" " << type_str_<<" {\n";
     mtor << "Consists of ";
     for (int i=0; i< consists_str_arr_.size(); i++)
diff --git a/lily/molecule.cc b/lily/molecule.cc
index 2c946484c8..ee4fe5e485 100644
--- a/lily/molecule.cc
+++ b/lily/molecule.cc
@@ -129,8 +129,12 @@ Molecule::Molecule(Molecule const &s)
 void
 Molecule::print() const
 {
+#ifndef NPRINT
+    if (! check_debug)
+	return;
     for (iter_top(ats,c); c.ok(); c++)
 	c->print();
+#endif
 }
 
 void
-- 
2.39.5