From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Tue, 26 Sep 2006 10:54:17 +0000 (+0000)
Subject: (run_iterator_on_me): break out of loop
X-Git-Tag: cvs/HEAD~58
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=d66e4965b33ea51c8e4f108af061afe8d41f5e69;p=lilypond.git

(run_iterator_on_me): break out of loop
if moment doesn't increase.
---

diff --git a/ChangeLog b/ChangeLog
index f35d6e6f0b..194d6c0a09 100644
--- 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 ddcec501ba..858922562f 100644
--- 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)
 	{
 	  /*