X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fgrob-pq-engraver.cc;h=10644e7775c47754bc756361b31378a28538d8af;hb=951e47c99cccf317207848412262b9c6c37e01aa;hp=8dbad9488d43f3e67d926c35dd311c408cae20d4;hpb=634ad74db688a5305f001917453c5cd15305c539;p=lilypond.git diff --git a/lily/grob-pq-engraver.cc b/lily/grob-pq-engraver.cc index 8dbad9488d..10644e7775 100644 --- a/lily/grob-pq-engraver.cc +++ b/lily/grob-pq-engraver.cc @@ -1,4 +1,4 @@ -/* +/* grob-pq-engraver.cc -- implement Grob_pq_engraver source file of the GNU LilyPond music typesetter @@ -11,7 +11,7 @@ #include "grob.hh" #include "warn.hh" -class Grob_pq_engraver: public Engraver +class Grob_pq_engraver : public Engraver { public: TRANSLATOR_DECLARATIONS (Grob_pq_engraver); @@ -22,7 +22,6 @@ protected: virtual void stop_translation_timestep (); }; - Grob_pq_engraver::Grob_pq_engraver () { } @@ -30,12 +29,12 @@ Grob_pq_engraver::Grob_pq_engraver () void Grob_pq_engraver::initialize () { - context ()->set_property ("busyGrobs", SCM_EOL); + context ()->set_property ("busyGrobs", SCM_EOL); } LY_DEFINE (ly_grob_pq_less_p, "ly:grob-pq-less?", - 2, 0 , 0, (SCM a, SCM b), - "Compare 2 grob priority queue entries. Internal") + 2, 0, 0, (SCM a, SCM b), + "Compare 2 grob priority queue entries. Internal") { if (Moment::compare (*unsmob_moment (scm_car (a)), *unsmob_moment (scm_car (b))) < 0) @@ -43,11 +42,11 @@ LY_DEFINE (ly_grob_pq_less_p, "ly:grob-pq-less?", else return SCM_BOOL_F; } - + void Grob_pq_engraver::acknowledge_grob (Grob_info gi) { - Music * m = gi.music_cause (); + Music *m = gi.music_cause (); if (m && !gi.grob_->internal_has_interface (ly_symbol2scm ("multi-measure-interface"))) @@ -56,8 +55,8 @@ Grob_pq_engraver::acknowledge_grob (Grob_info gi) Moment l = m->get_length (); if (!l.to_bool ()) - return ; - + return; + if (n.grace_part_) { l.grace_part_ = l.main_part_; @@ -66,8 +65,8 @@ Grob_pq_engraver::acknowledge_grob (Grob_info gi) Moment end = n + l; SCM lst = scm_acons (end.smobbed_copy (), - gi.grob_->self_scm (), - SCM_EOL); + gi.grob_->self_scm (), + SCM_EOL); SCM busy = get_property ("busyGrobs"); busy = scm_merge_x (lst, busy, ly_grob_pq_less_p_proc); @@ -75,7 +74,6 @@ Grob_pq_engraver::acknowledge_grob (Grob_info gi) } } - void Grob_pq_engraver::stop_translation_timestep () { @@ -103,7 +101,7 @@ Grob_pq_engraver::start_translation_timestep () /* The grob-pq-engraver is not water tight, and stuff like tupletSpannerDuration confuses it. - */ + */ busy = scm_cdr (busy); } @@ -111,16 +109,15 @@ Grob_pq_engraver::start_translation_timestep () context ()->set_property ("busyGrobs", busy); } - ADD_TRANSLATOR (Grob_pq_engraver, -/* descr */ "Administrate when certain grobs (eg. note heads) stop playing; this \ + /* descr */ "Administrate when certain grobs (eg. note heads) stop playing; this \ engraver is a sort-of a failure, since it doesn't handle all sorts of \ borderline cases very well. \ -", \ - -/* creats*/ "", \ -/* accepts */ "", \ -/* acks */ "grob-interface", \ -/* reads */ "busyGrobs", \ -/* write */ "busyGrobs"); +", + + /* creats*/ "",\ + /* accepts */ "",\ + /* acks */ "grob-interface",\ + /* reads */ "busyGrobs",\ + /* write */ "busyGrobs");