]> git.donarmstrong.com Git - lilypond.git/blob - lily/tie-column.cc
release: 1.3.25
[lilypond.git] / lily / tie-column.cc
1 /*   
2   tie-column.cc --  implement Tie_column
3   
4   source file of the GNU LilyPond music typesetter
5   
6   (c) 2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7   
8  */
9
10 #include "tie-column.hh"
11 #include "group-interface.hh"
12
13 Tie_column::Tie_column ()
14 {
15   set_elt_property ("ties", SCM_EOL);
16 }
17
18 void
19 Tie_column::add_tie (Score_element *s)
20 {
21   group (s).add_element (s);
22   s->add_dependency (this);
23 }
24
25 void
26 Tie_column::set_directions ()
27 {
28   Link_array<Score_element> s =
29     Group_interface__extract_elements (this, (Score_element*)0, "ties");
30 }
31
32 void
33 Tie_column::do_post_processing ()
34 {
35   set_directions ();
36 }