]> git.donarmstrong.com Git - lilypond.git/blob - lily/score-priority-engraver.cc
release: 1.1.45
[lilypond.git] / lily / score-priority-engraver.cc
1 /*
2   score-align-reg.cc -- implement Score_priority_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9 #include "axis-group-item.hh"
10 #include "score-priority-engraver.hh"
11 #include "item.hh"
12 #include "dictionary-iter.hh"
13 #include "break-align-item.hh"
14
15
16 Score_priority_engraver::Score_priority_engraver()
17 {
18   halign_p_ = 0;
19 }
20
21 void
22 Score_priority_engraver::do_pre_move_processing()
23 {
24   for (int i=0; i < column_p_arr_.size ();i++)
25     typeset_element (column_p_arr_[i]);
26   column_p_arr_.clear ();
27
28   if (halign_p_)
29     {
30       typeset_element (halign_p_);
31       halign_p_ =0;
32     }
33 }
34
35 /*
36   TODO: move this logic into Break_align_item
37  */
38 void
39 Score_priority_engraver::acknowledge_element (Score_element_info inf)
40 {
41   if (Item * item_l = dynamic_cast <Item *> (inf.elem_l_))
42     {
43       Dimension_cache * c = item_l->dim_cache_[X_AXIS];
44       if (c->empty_b () || c->parent_l_)
45         return;
46
47       bool breakable
48         = (item_l->remove_elt_property (breakable_scm_sym) != SCM_BOOL_F);
49       if (!breakable)
50         return ;
51
52
53       if (!halign_p_)
54         {
55           halign_p_ = new Break_align_item;
56           halign_p_->set_elt_property (breakable_scm_sym, SCM_BOOL_T);
57           announce_element (Score_element_info (halign_p_,0));
58         }
59
60       halign_p_->add_breakable_item (item_l);
61     }
62 }
63
64 ADD_THIS_TRANSLATOR(Score_priority_engraver);