(run_iterator_on_me): break out of loop

if moment doesn't increase.

diff --git a/ChangeLog b/ChangeLog
index f35d6e6f0b2ae2af96628b491940cf83726af42d..194d6c0a0925b90388b0cbf8a0aaa57e004ebafa 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2006-09-26  Han-Wen Nienhuys  <hanwen@lilypond.org>
 
+       * lily/global-context.cc (run_iterator_on_me): break out of loop
+       if moment doesn't increase.
+
        * scm/define-grob-properties.scm (all-user-grob-properties): add
        forced property.
 

diff --git a/lily/global-context.cc b/lily/global-context.cc
index ddcec501ba4ec521d56176387d004405210fd96e..858922562f0509a7c325d0406b49164c28a9b8ba 100644 (file)
--- a/lily/global-context.cc
+++ b/lily/global-context.cc
@@ -140,6 +140,13 @@ Global_context::run_iterator_on_me (Music_iterator *iter)
       if (w.main_part_.is_infinity () || w > final_mom)
        break;
 
+      if (w == prev_mom_)
+       {
+         programming_error ("Moment is not increasing. Aborting interpretation.");
+         break ;
+       }
+
+      
       if (first)
        {
          /*