2 horizontal-bracket-engraver.cc -- implement
3 Horizontal_bracket_engraver
5 source file of the GNU LilyPond music typesetter
7 (c) 2002--2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
10 #include "engraver.hh"
11 #include "side-position-interface.hh"
12 #include "note-column.hh"
13 #include "pointer-group-interface.hh"
15 #include "translator.icc"
17 class Horizontal_bracket_engraver : public Engraver
20 TRANSLATOR_DECLARATIONS (Horizontal_bracket_engraver);
21 Link_array<Spanner> bracket_stack_;
22 Link_array<Music> events_;
26 virtual bool try_music (Music *);
27 void stop_translation_timestep ();
28 void process_music ();
29 DECLARE_ACKNOWLEDGER (note_column);
32 ADD_ACKNOWLEDGER (Horizontal_bracket_engraver, note_column);
33 ADD_TRANSLATOR (Horizontal_bracket_engraver,
34 "Create horizontal brackets over notes for musical analysis purposes.",
36 "note-grouping-event",
40 Horizontal_bracket_engraver::Horizontal_bracket_engraver ()
47 Horizontal_bracket_engraver::try_music (Music *m)
49 if (m->is_mus_type ("note-grouping-event"))
51 Direction d = to_dir (m->get_property ("span-direction"));
56 if (pop_count_ > bracket_stack_.size ())
57 m->origin ()->warning (_ ("don't have that many brackets"));
65 if (pop_count_ && push_count_)
66 m->origin ()->warning (_ ("conflicting note group events"));
74 Horizontal_bracket_engraver::acknowledge_note_column (Grob_info gi)
76 for (int i = 0; i < bracket_stack_.size (); i++)
78 Side_position_interface::add_support (bracket_stack_[i], gi.grob ());
79 Pointer_group_interface::add_grob (bracket_stack_[i],
80 ly_symbol2scm ("columns"), gi.grob ());
81 add_bound_item (bracket_stack_[i],
87 Horizontal_bracket_engraver::process_music ()
89 for (int k = 0; k < push_count_; k++)
91 Spanner *sp = make_spanner ("HorizontalBracket", events_[k]->self_scm ());
93 for (int i = 0; i < bracket_stack_.size (); i++)
96 sp is the smallest, it should be added to the bigger brackets.
98 Side_position_interface::add_support (bracket_stack_[i], sp);
100 bracket_stack_.push (sp);
105 Horizontal_bracket_engraver::stop_translation_timestep ()
107 for (int i = pop_count_; i--;)
109 if (bracket_stack_.size ())
110 bracket_stack_.pop ();