From: fred <fred>
Date: Sun, 24 Mar 2002 19:52:37 +0000 (+0000)
Subject: lilypond-0.1.1
X-Git-Tag: release/1.5.59~4187
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a62cad4bf17319da1653143494a901c1382ec767;p=lilypond.git

lilypond-0.1.1
---

diff --git a/lily/engraver-group.cc b/lily/engraver-group.cc
index a1a77d7da1..672c8f2e5f 100644
--- a/lily/engraver-group.cc
+++ b/lily/engraver-group.cc
@@ -174,6 +174,8 @@ void
 Engraver_group_engraver::do_print()const
 {
 #ifndef NPRINT
+    if ( !check_debug)
+	return ;
     mtor << "ID: " << id_str_ << "\n";
     for (PCursor<Engraver*> i(grav_list_.top()); i.ok(); i++)
 	i->print();
diff --git a/lily/performer-group-performer.cc b/lily/performer-group-performer.cc
index 66471128e2..55c5e18994 100644
--- a/lily/performer-group-performer.cc
+++ b/lily/performer-group-performer.cc
@@ -167,6 +167,8 @@ void
 Performer_group_performer::do_print()const
 {
 #ifndef NPRINT
+    if ( !check_debug)
+	return ;
     for ( PCursor<Performer*> i( perf_p_list_.top() ); i.ok(); i++ )
 	i->print();
 #endif