]> git.donarmstrong.com Git - lilypond.git/blob - lily/script-column-engraver.cc
Patch for auto-beam; Fix issue 511
[lilypond.git] / lily / script-column-engraver.cc
1 /*
2   script-column-engraver.cc -- implement Script_column_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1999--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>
7 */
8
9 #include "engraver.hh"
10 #include "script-column.hh"
11 #include "side-position-interface.hh"
12 #include "item.hh"
13
14 #include "translator.icc"
15
16 /**
17    Find potentially colliding scripts, and put them in a
18    Script_column, that will fix the collisions.  */
19 class Script_column_engraver : public Engraver
20 {
21   Grob *script_column_;
22   vector<Grob*> scripts_;
23
24 public:
25   TRANSLATOR_DECLARATIONS (Script_column_engraver);
26 protected:
27   DECLARE_ACKNOWLEDGER (side_position);
28   void process_acknowledged ();
29   void stop_translation_timestep ();
30 };
31
32 Script_column_engraver::Script_column_engraver ()
33 {
34   script_column_ = 0;
35 }
36
37 void
38 Script_column_engraver::stop_translation_timestep ()
39 {
40   if (script_column_)
41     {
42       for (vsize i = 0; i < scripts_.size (); i++)
43         if (Side_position_interface::get_axis (scripts_[i]) == Y_AXIS)
44           Script_column::add_side_positioned (script_column_, scripts_[i]);
45     }
46
47   script_column_ = 0;
48   scripts_.clear ();
49 }
50
51 void
52 Script_column_engraver::acknowledge_side_position (Grob_info inf)
53 {
54   Item *thing = dynamic_cast<Item *> (inf.grob ());
55   if (thing)
56     {
57       if (!Item::is_non_musical (thing))
58         scripts_.push_back (thing);
59     }
60 }
61
62 void
63 Script_column_engraver::process_acknowledged ()
64 {
65   if (!script_column_ && scripts_.size () > 1)
66     script_column_ = make_item ("ScriptColumn", SCM_EOL);
67 }
68
69 ADD_ACKNOWLEDGER (Script_column_engraver, side_position);
70 ADD_TRANSLATOR (Script_column_engraver,
71                 /* doc */
72                 "Find potentially colliding scripts and put them into a"
73                 " @code{ScriptColumn} object; that will fix the collisions.",
74
75                 /* create */
76                 "ScriptColumn ",
77
78                 /* read */
79                 "",
80
81                 /* write */
82                 ""
83                 );