* input/regression/repeat-percent-grace.ly: new file.

[lilypond.git] / lily / percent-repeat-iterator.cc

diff --git a/lily/percent-repeat-iterator.cc b/lily/percent-repeat-iterator.cc
index 27481cf1ab1b3335fc469989f7723a4d1a0a2be9..495f30f33cff535e088a5b4d0ccc65a399d4009c 100644 (file)
--- a/lily/percent-repeat-iterator.cc
+++ b/lily/percent-repeat-iterator.cc
@@ -7,10 +7,20 @@
                   Erik Sandberg <mandolaerik@gmail.com>
 */
 
-#include "percent-repeat-iterator.hh"
 #include "input.hh"
 #include "music.hh"
 #include "repeated-music.hh"
+#include "sequential-iterator.hh"
+
+class Percent_repeat_iterator : public Sequential_iterator
+{
+public:
+  DECLARE_CLASSNAME(Percent_repeat_iterator);
+  DECLARE_SCHEME_CALLBACK (constructor, ());
+  Percent_repeat_iterator ();
+protected:
+  virtual SCM get_music_list () const;
+};
 
 IMPLEMENT_CTOR_CALLBACK (Percent_repeat_iterator);
 
@@ -35,8 +45,10 @@ Percent_repeat_iterator::get_music_list () const
     percent->set_property ("length", length);
     if (repeats > 1)
       percent->set_property ("repeat-count", scm_int2num (i));
+    
     child_list = scm_cons (percent->unprotect (), child_list);
   }
+  
   child_list = scm_cons (child->self_scm (), child_list);
 
   return child_list;