]> git.donarmstrong.com Git - lilypond.git/commitdiff
Fix issue 2089: dangerous redefinition of SCM s / Moment s
authorDavid Kastrup <dak@gnu.org>
Fri, 9 Dec 2011 09:09:53 +0000 (10:09 +0100)
committerGraham Percival <graham@percival-music.ca>
Fri, 9 Dec 2011 13:10:09 +0000 (05:10 -0800)
lily/music-sequence.cc

index e8493b8ada14ce36e54e593de9e2c30bff9e7fc5..4e922eb88dfd044d5f32f342cd8207bb3b898b1e 100644 (file)
@@ -143,17 +143,15 @@ Music_sequence::minimum_start (SCM l)
 Moment
 Music_sequence::first_start (SCM l)
 {
-  Moment m;
 
   for (SCM s = l; scm_is_pair (s); s = scm_cdr (s))
     {
       Music *mus = unsmob_music (scm_car (s));
-      Moment l = mus->get_length ();
-      Moment s = mus->start_mom ();
-      if (l.to_bool () || s.to_bool ())
-        return s;
+      Moment start = mus->start_mom ();
+      if (mus->get_length ().to_bool () || start.to_bool ())
+        return start;
     }
-  return m;
+  return Moment ();
 }
 
 MAKE_SCHEME_CALLBACK (Music_sequence, simultaneous_relative_callback, 2);