]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/grob-array.cc
* lily/note-column.cc: reformat.
[lilypond.git] / lily / grob-array.cc
index 7b462cbba241faed09cabda115c9c24cf71ad5b5..dff5102a83c776406473e5ba60ed4ae6e54e8ee7 100644 (file)
@@ -82,6 +82,15 @@ Grob_array::clear ()
   grobs_.clear ();
 }
 
+void
+Grob_array::remove_duplicates ()
+{
+  assert (!ordered_);
+  
+  vector_sort (grobs_, default_compare);
+  ::uniq (grobs_);
+}
+
 bool
 Grob_array::empty () const
 {
@@ -108,3 +117,4 @@ grob_list_to_grob_array (SCM lst)
     ga->add (unsmob_grob (scm_car (s)));
   return arr_scm;
 }
+