Editing.

[lilypond.git] / lily / bar-check-iterator.cc

diff --git a/lily/bar-check-iterator.cc b/lily/bar-check-iterator.cc
index fe203f16ec8c3518934a1656722322e27ea883df..46479892ef67e5e8c1ae52221970db058dc1ccc6 100644 (file)
--- a/lily/bar-check-iterator.cc
+++ b/lily/bar-check-iterator.cc
@@ -1,4 +1,4 @@
-/*   
+/*
   bar-check-iterator.cc -- implement Bar_check_iterator
 
   source file of the GNU LilyPond music typesetter
@@ -13,12 +13,12 @@
 /*
   Check bar checks. We do this outside the engravers so that you can
   race through the score using skipTypesetting to correct durations.
- */
+*/
 class Bar_check_iterator : Simple_music_iterator
 {
 public:
   virtual void process (Moment);
-  Bar_check_iterator ( );
+  Bar_check_iterator ();
   DECLARE_SCHEME_CALLBACK (constructor, ());
 };
 
@@ -36,13 +36,17 @@ Bar_check_iterator::process (Moment m)
     {
       Context *tr = get_outlet ();
 
+      SCM check = tr->get_property ("ignoreBarChecks");
+      if (to_boolean (check))
+       return;
+      
       SCM mp = tr->get_property ("measurePosition");
       SCM sync = tr->get_property ("barCheckSynchronize");
 
-      Moment * where = unsmob_moment (mp);
+      Moment *where = unsmob_moment (mp);
       if (!where)
        return;
-      
+
       if (where->main_part_)
        {
          bool warn = true;
@@ -63,8 +67,8 @@ Bar_check_iterator::process (Moment m)
            }
 
          if (warn)
-           get_music ()->origin ()->warning (_f ("barcheck failed at: %s", 
-                                             where->to_string ()));
+           get_music ()->origin ()->warning (_f ("barcheck failed at: %s",
+                                                 where->to_string ()));
        }
     }
-}    
+}