]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/percent-repeat-iterator.cc
Web: Updated introduction.itexi - Easier Editing
[lilypond.git] / lily / percent-repeat-iterator.cc
index 5bf7bf2197bdcbac039073c732dec6df6e72b0bf..00f21af4d6969f60f7190f4914c95f0683639b38 100644 (file)
@@ -1,7 +1,7 @@
 /*
   This file is part of LilyPond, the GNU music typesetter.
 
-  Copyright (C) 2001--2011  Han-Wen Nienhuys <hanwen@xs4all.nl>
+  Copyright (C) 2001--2015  Han-Wen Nienhuys <hanwen@xs4all.nl>
                   Erik Sandberg <mandolaerik@gmail.com>
 
   LilyPond is free software: you can redistribute it and/or modify
@@ -22,6 +22,7 @@
 #include "input.hh"
 #include "repeated-music.hh"
 #include "sequential-iterator.hh"
+#include "lily-imports.hh"
 
 class Percent_repeat_iterator : public Sequential_iterator
 {
@@ -43,6 +44,7 @@ SCM
 Percent_repeat_iterator::get_music_list () const
 {
   Music *mus = get_music ();
+
   Music *child = Repeated_music::body (mus);
   SCM length = child->get_length ().smobbed_copy ();
   SCM child_list = SCM_EOL;
@@ -58,9 +60,7 @@ Percent_repeat_iterator::get_music_list () const
     event_type = "DoublePercentEvent";
   else
     {
-      slash_count
-        = scm_call_1 (ly_lily_module_constant ("calc-repeat-slash-count"),
-                      child->self_scm ());
+      slash_count = Lily::calc_repeat_slash_count (child->self_scm ());
       event_type = "RepeatSlashEvent";
     }