3 stanza-number-align-engraver.cc -- implement
5 source file of the GNU LilyPond music typesetter
7 (c) 2004 Han-Wen Nienhuys <hanwen@xs4all.nl>
12 #include "engraver.hh"
13 #include "note-head.hh"
14 #include "lyric-extender.hh"
15 #include "group-interface.hh"
16 #include "side-position-interface.hh"
18 class Stanza_number_align_engraver : public Engraver
21 TRANSLATOR_DECLARATIONS (Stanza_number_align_engraver);
24 Link_array<Grob> lyrics_;
25 Link_array<Grob> stanza_numbers_;
26 virtual void acknowledge_grob (Grob_info);
27 virtual void stop_translation_timestep ();
30 Stanza_number_align_engraver::Stanza_number_align_engraver ()
36 Stanza_number_align_engraver::acknowledge_grob (Grob_info gi)
40 if (h->internal_has_interface (ly_symbol2scm ("lyric-syllable-interface")))
42 else if (h->internal_has_interface (ly_symbol2scm ("stanza-number-interface")))
43 stanza_numbers_.push (h);
47 Stanza_number_align_engraver::stop_translation_timestep ()
49 for (int i = lyrics_.size (); i--;)
50 for (int j = stanza_numbers_.size (); j--;)
51 Side_position_interface::add_support (stanza_numbers_[j], lyrics_[i]);
53 stanza_numbers_.clear ();
58 ADD_TRANSLATOR (Stanza_number_align_engraver,
59 "This engraver ensures that stanza numbers are neatly aligned. ",
62 "stanza-number-interface lyric-syllable-interface ",