2 rhythmic-column-engraver.cc -- implement Rhythmic_column_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
10 #include "rhythmic-head.hh"
12 #include "note-column.hh"
13 #include "dot-column.hh"
14 #include "pointer-group-interface.hh"
16 #include "translator.icc"
19 this engraver glues together stems, rests and note heads into a NoteColumn
22 It also generates spacing objects. Originally, we have tried to
23 have the spacing functionality at different levels.
25 - by simply using the sequence of Separation-item as
26 spacing-sequences (at staff level). Unfortunately, this fucks up if
27 there are different kinds of tuplets in different voices (8th and
28 8ths triplets combined made the program believe there were 1/12 th
31 Doing it in a separate engraver using timing info is generally
32 complicated (start/end time management), and fucks up if a voice
35 Now we do it from here again. This has the problem that voices can
36 appear and disappear at will, leaving lots of loose ends (the note
37 spacing engraver don't know where to connect the last note of the
38 voice on the right with), but we don't complain about those, and let
39 the default spacing do its work.
42 class Rhythmic_column_engraver : public Engraver
44 Link_array<Grob> rheads_;
52 void add_spacing_item (Grob*);
54 TRANSLATOR_DECLARATIONS (Rhythmic_column_engraver);
57 DECLARE_ACKNOWLEDGER (dot_column);
58 DECLARE_ACKNOWLEDGER (stem);
59 DECLARE_ACKNOWLEDGER (rhythmic_head);
60 void process_acknowledged ();
61 void stop_translation_timestep ();
64 Rhythmic_column_engraver::Rhythmic_column_engraver ()
75 Rhythmic_column_engraver::add_spacing_item (Grob *g)
79 Pointer_group_interface::add_grob (spacing_,
80 ly_symbol2scm ("left-items"),
85 Pointer_group_interface::add_grob (last_spacing_,
86 ly_symbol2scm ("right-items"),
92 Rhythmic_column_engraver::process_acknowledged ()
98 note_column_ = make_item ("NoteColumn", rheads_[0]->self_scm ());
100 spacing_ = make_item ("NoteSpacing", SCM_EOL);
101 add_spacing_item (note_column_);
104 for (int i = 0; i < rheads_.size (); i++)
106 if (!rheads_[i]->get_parent (X_AXIS))
107 Note_column::add_head (note_column_, rheads_[i]);
109 rheads_.set_size (0);
115 && !dotcol_->get_parent (X_AXIS))
117 Note_column::set_dotcol (note_column_, dotcol_);
121 && !stem_->get_parent (X_AXIS))
123 Note_column::set_stem (note_column_, stem_);
130 Rhythmic_column_engraver::acknowledge_stem (Grob_info i)
136 Rhythmic_column_engraver::acknowledge_rhythmic_head (Grob_info i)
138 rheads_.push (i.grob ());
142 Rhythmic_column_engraver::acknowledge_dot_column (Grob_info i)
148 Rhythmic_column_engraver::stop_translation_timestep ()
154 last_spacing_ = spacing_;
163 ADD_ACKNOWLEDGER (Rhythmic_column_engraver, dot_column);
164 ADD_ACKNOWLEDGER (Rhythmic_column_engraver, stem);
165 ADD_ACKNOWLEDGER (Rhythmic_column_engraver, rhythmic_head);
167 ADD_TRANSLATOR (Rhythmic_column_engraver,
168 /* descr */ "Generates NoteColumn, an objects that groups stems, noteheads and rests.",
169 /* creats*/ "NoteColumn NoteSpacing",