X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Frepeat-acknowledge-engraver.cc;h=77b840d597ac1cdbfc9da837840902cda6df8d07;hb=f07f18bef861d6afa48b941b7579079d5d40df80;hp=c1c77892ca7a71c8aa8e6f310204f83a51799a3f;hpb=1e1fa5221ca359326b073626168c6b7cda6453e1;p=lilypond.git diff --git a/lily/repeat-acknowledge-engraver.cc b/lily/repeat-acknowledge-engraver.cc index c1c77892ca..77b840d597 100644 --- a/lily/repeat-acknowledge-engraver.cc +++ b/lily/repeat-acknowledge-engraver.cc @@ -1,39 +1,35 @@ -/* - repeat-acknowledge-engraver.cc -- implement Repeat_acknowledge_engraver - +/* + repeat-acknowledge-engraver.cc -- implement Repeat_acknowledge_engraver + source file of the GNU LilyPond music typesetter - - (c) 2000--2004 Han-Wen Nienhuys - - */ + + (c) 2000--2005 Han-Wen Nienhuys +*/ #include "engraver.hh" #include "translator-group.hh" #include "context.hh" #include "repeated-music.hh" - /* Objective: -- set and reset repeatCommands, so Unfolded_repeat_iterator knows - where to set variables. + where to set variables. -- collect information passed by Unfolded_repeat_iterator for - Bar_engraver: writes whichBar property. (TODO: check for - interactions with timing engraver.) - - */ + Bar_engraver: writes whichBar property. (TODO: check for + interactions with timing engraver.) +*/ class Repeat_acknowledge_engraver : public Engraver { public: - + TRANSLATOR_DECLARATIONS (Repeat_acknowledge_engraver); protected: virtual void start_translation_timestep (); virtual void process_music (); virtual void initialize (); - }; void @@ -42,7 +38,6 @@ Repeat_acknowledge_engraver::initialize () context ()->set_property ("repeatCommands", SCM_EOL); } - Repeat_acknowledge_engraver::Repeat_acknowledge_engraver () { } @@ -50,7 +45,7 @@ Repeat_acknowledge_engraver::Repeat_acknowledge_engraver () void Repeat_acknowledge_engraver::start_translation_timestep () { - Context * tr = context ()->where_defined (ly_symbol2scm ("repeatCommands")); + Context *tr = context ()->where_defined (ly_symbol2scm ("repeatCommands")); if (!tr) tr = context (); @@ -62,12 +57,12 @@ Repeat_acknowledge_engraver::process_music () { /* At the start of a piece, we don't print any repeat bars. - */ + */ if (!now_mom ().main_part_) - return ; - + return; + SCM cs = get_property ("repeatCommands"); - + String s = ""; bool start = false; bool end = false; @@ -81,7 +76,7 @@ Repeat_acknowledge_engraver::process_music () end = true; else if (scm_is_pair (command) && scm_car (command) == ly_symbol2scm ("volta")) volta_found = true; - cs = scm_cdr (cs); + cs = scm_cdr (cs); } if (start && end) @@ -93,15 +88,15 @@ Repeat_acknowledge_engraver::process_music () /* TODO: line breaks might be allowed if we set whichBar to "". - */ + */ /* We only set the barline if we wouldn't overwrite a previously set barline. - */ + */ SCM wb = get_property ("whichBar"); - SCM db = get_property ("defaultBarType"); - if (!scm_is_string (wb) || ly_c_equal_p (db, wb)) + SCM db = get_property ("defaultBarType"); + if (!scm_is_string (wb) || ly_is_equal (db, wb)) { if (s != "" || (volta_found && !scm_is_string (wb))) { @@ -110,11 +105,11 @@ Repeat_acknowledge_engraver::process_music () } } -ENTER_DESCRIPTION (Repeat_acknowledge_engraver, -/* descr */ "Acknowledge repeated music, and convert the contents of " -"repeatCommands ainto an appropriate setting for whichBar.", -/* creats*/ "", -/* accepts */ "", -/* acks */ "", -/* reads */ "repeatCommands whichBar", -/* write */ ""); +ADD_TRANSLATOR (Repeat_acknowledge_engraver, + /* descr */ "Acknowledge repeated music, and convert the contents of " + "repeatCommands ainto an appropriate setting for whichBar.", + /* creats*/ "", + /* accepts */ "", + /* acks */ "", + /* reads */ "repeatCommands whichBar", + /* write */ "");