]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/tie.cc
Fix some bugs in the dynamic engraver and PostScript backend
[lilypond.git] / lily / tie.cc
index b4b5206386ae23a3236fa830514953cd8c4f2001..3f282071e77fe393bad531df74895ef3a97ef840 100644 (file)
 #include "warn.hh"
 
 
-bool
-Tie::less (Grob *const &s1,
-          Grob *const &s2)
+int
+Tie::compare (Grob *const &s1,
+             Grob *const &s2)
 {
-  return Tie::get_position (s1) < Tie::get_position (s2);
+  return sign (Tie::get_position (s1) - Tie::get_position (s2));
 }
 
 void
@@ -235,7 +235,7 @@ Tie::print (SCM smob)
 
   Bezier b;
   int i = 0;
-  for (SCM s = cp; scm_is_pair (s); s = scm_cdr (s))
+  for (SCM s = cp; s != SCM_EOL; s = scm_cdr (s))
     {
       b.control_[i] = ly_scm2offset (scm_car (s));
       i++;