X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fvolta-repeat-iterator.cc;h=d12660579519601dfb43aff0a1ebd31be75b3478;hb=411e25bc64574f41af48b906932f69c3377b8bd7;hp=bcbc34f8cb3b9d3800436d495ac33c8ce65cc6e9;hpb=e0af94bb8939bc6f4998db6294010baa77139092;p=lilypond.git diff --git a/lily/volta-repeat-iterator.cc b/lily/volta-repeat-iterator.cc index bcbc34f8cb..d126605795 100644 --- a/lily/volta-repeat-iterator.cc +++ b/lily/volta-repeat-iterator.cc @@ -20,6 +20,7 @@ #include "music.hh" #include "sequential-iterator.hh" #include "context.hh" +#include "lily-imports.hh" class Volta_repeat_iterator : public Sequential_iterator { @@ -128,7 +129,7 @@ Volta_repeat_iterator::next_element (bool side_effect) else { - add_repeat_command (scm_list_n (ly_symbol2scm ("volta"), SCM_BOOL_F, SCM_UNDEFINED)); + add_repeat_command (scm_list_2 (ly_symbol2scm ("volta"), SCM_BOOL_F)); if (done_count_ - 1 < alt_count_) { @@ -137,7 +138,7 @@ Volta_repeat_iterator::next_element (bool side_effect) if (to_boolean (get_outlet ()->get_property ("timing"))) { for (SCM p = alt_restores_; scm_is_pair (p); p = scm_cdr (p)) - scm_apply_0 (ly_lily_module_constant ("ly:context-set-property!"), + scm_apply_0 (Lily::ly_context_set_property_x, scm_car (p)); } } @@ -147,8 +148,8 @@ Volta_repeat_iterator::next_element (bool side_effect) repstr = "1.--" + ::to_string (rep_count_ - alt_count_ + done_count_) + "."; if (done_count_ <= alt_count_) - add_repeat_command (scm_list_n (ly_symbol2scm ("volta"), - ly_string2scm (repstr), SCM_UNDEFINED)); + add_repeat_command (scm_list_2 (ly_symbol2scm ("volta"), + ly_string2scm (repstr))); } else add_repeat_command (ly_symbol2scm ("end-repeat"));