]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/music-sequence.cc
* scm/lily.scm (PLATFORM): Export.
[lilypond.git] / lily / music-sequence.cc
index 555e2e3afb084df344f6e05e6d0985df6789b501..9879da98e0bd3f6a9b896ffc3fe98fd04d7845ef 100644 (file)
@@ -50,7 +50,7 @@ Music_sequence::maximum_length (SCM l)
     {
       Music *m = unsmob_music (scm_car (s));
       Moment l = m->get_length ();
-      dur = dur >? l;
+      dur = max (dur, l);
     }
 
   return dur;
@@ -122,7 +122,7 @@ Music_sequence::minimum_start (SCM l)
 
   for (SCM s = l; scm_is_pair (s); s = scm_cdr (s))
     {
-      m = m <? unsmob_music (scm_car (s))->start_mom ();
+      m = min (m, unsmob_music (scm_car (s))->start_mom ());
     }
   return m;
 }