X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fbar-engraver.cc;h=ce456c8963cf5bf4571adc039ca37866854db659;hb=9e69cb84d6ee5b0a861cd97869b10e3bdf0c833c;hp=3802d20f6d6a68619e107223623b4cf0f5d6ae6a;hpb=28976d28a04cfb9abe97af7214d7dce11f732604;p=lilypond.git diff --git a/lily/bar-engraver.cc b/lily/bar-engraver.cc index 3802d20f6d..ce456c8963 100644 --- a/lily/bar-engraver.cc +++ b/lily/bar-engraver.cc @@ -3,43 +3,42 @@ source file of the GNU LilyPond music typesetter - (c) 1997--2004 Han-Wen Nienhuys + (c) 1997--2006 Han-Wen Nienhuys Jan Nieuwenhuizen */ #include "bar-line.hh" +#include "context.hh" #include "score-engraver.hh" -#include "event.hh" -#include "engraver-group-engraver.hh" #include "warn.hh" #include "item.hh" -#include "engraver.hh" + +#include "translator.icc" /* generate bars. Either user ("|:"), or default (new measure) - - */ +*/ class Bar_engraver : public Engraver { public: TRANSLATOR_DECLARATIONS (Bar_engraver); - void request_bar (String type_string); - + void request_bar (string type_string); + protected: virtual void finalize (); - virtual void stop_translation_timestep (); - virtual void process_acknowledged_grobs (); + void stop_translation_timestep (); + void process_acknowledged (); private: void typeset_bar (); void create_bar (); - Item * bar_; + Item *bar_; }; Bar_engraver::Bar_engraver () { - bar_ =0; + bar_ = 0; } void @@ -47,12 +46,10 @@ Bar_engraver::create_bar () { if (!bar_) { - bar_ = make_item ("BarLine"); + bar_ = make_item ("BarLine", SCM_EOL); SCM gl = get_property ("whichBar"); if (scm_equal_p (gl, bar_->get_property ("glyph")) != SCM_BOOL_T) - bar_->set_property ("glyph", gl); - - announce_grob (bar_, SCM_EOL); + bar_->set_property ("glyph", gl); } } @@ -63,56 +60,44 @@ Bar_engraver::finalize () } /* - Bar_engraver should come *after* any engravers that + Bar_engraver should come *after* any engravers that modify whichBar This is a little hairy : whichBar may be set by Repeat_acknowledge_engraver::process_music, which is at score context. This means that grobs could should be created after - process_music. We do stuff process_acknowledged_grobs (), just to be + process_music. We do stuff process_acknowledged (), just to be on the safe side. - */ void -Bar_engraver::process_acknowledged_grobs () +Bar_engraver::process_acknowledged () { - if (!bar_ && is_string (get_property ("whichBar"))) - { - create_bar (); - } + if (!bar_ && scm_is_string (get_property ("whichBar"))) + create_bar (); } void Bar_engraver::typeset_bar () { - if (bar_) - { - typeset_grob (bar_); - bar_ =0; - } + bar_ = 0; } /* - lines may only be broken if there is a barline in all staves + lines may only be broken if there is a barline in all staves */ -void +void Bar_engraver::stop_translation_timestep () { if (!bar_) - { - get_score_engraver ()->forbid_breaks (); // guh. Use properties! - } + context ()->get_score_context ()->set_property ("forbidBreak", SCM_BOOL_T); else typeset_bar (); } - -ENTER_DESCRIPTION (Bar_engraver, -/* descr */ "Create barlines. This engraver is controlled through the " -"@code{whichBar} property. If it has no bar line to create, it will forbid a linebreak at this point", -/* creats*/ "BarLine", -/* accepts */ "", -/* acks */ "", -/* reads */ "whichBar", -/* write */ ""); +ADD_TRANSLATOR (Bar_engraver, + /* doc */ "Create barlines. This engraver is controlled through the " + "@code{whichBar} property. If it has no bar line to create, it will forbid a linebreak at this point", + /* create */ "BarLine", + /* read */ "whichBar", + /* write */ "forbidBreak");