2 head-column.cc -- implement Head_column
4 source file of the GNU LilyPond music typesetter
6 (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
10 #include "head-column.hh"
11 #include "note-head.hh"
15 Head_column::Head_column()
22 Head_column::do_substitute_dependency (Score_elem*o,
25 Script_column::do_substitute_dependency (o,n);
26 if (o->name() == Note_head::static_name ())
28 head_l_arr_.substitute ((Note_head*)o->item(),
29 (n)? (Note_head*)n->item() : 0);
33 stem_l_ = n ? (Stem*)n->item():0;
39 Head_column::set (Stem*stem_l)
42 Score_elem::add_dependency (stem_l);
43 for (int i=0; i < script_l_arr_.size(); i++)
44 script_l_arr_[i]->set_stem (stem_l);
48 Head_column::add (Script *script_l)
50 Script_column::add (script_l) ;
52 script_l->set_stem (stem_l_);
55 Head_column::add (Note_head *n_l)
58 head_l_arr_.push (n_l);
63 IMPLEMENT_IS_TYPE_B1(Head_column,Script_column);
66 Head_column::do_print() const
69 DOUT << "heads: " << head_l_arr_.size();
74 Head_column::do_pre_processing()
81 Script_column::do_pre_processing();