]> git.donarmstrong.com Git - lilypond.git/blob - lily/engraver.cc
3ecd606e926d24265882f807ab0be7976b215273
[lilypond.git] / lily / engraver.cc
1 /*
2   engraver.cc -- implement Engraver
3
4   Sourcefile of GNU LilyPond musictypesetter
5
6   (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9 #include "music-list.hh"
10 #include "musical-request.hh"
11 #include "engraver.hh"
12 #include "engraver-group.hh"
13 #include "debug.hh"
14
15 void
16 Engraver::fill_staff_info (Staff_info&)
17 {
18   
19 }
20
21
22 void
23 Engraver::announce_element (Score_element_info i)
24 {
25   i.origin_grav_l_arr_.push (this);
26   daddy_grav_l()->announce_element (i);
27 }
28
29 void
30 Engraver::typeset_element (Score_element*p)
31 {
32   daddy_grav_l()->typeset_element (p);
33 }
34
35 void
36 Engraver::typeset_element (Graphical_lisp_element*p)
37 {
38   daddy_grav_l ()->typeset_element (p);
39 }
40
41 Paper_def*
42 Engraver::paper() const
43 {
44   return (Paper_def*)output_def_l_;
45 }
46
47
48 Staff_info
49 Engraver::get_staff_info() const
50 {
51   if (daddy_grav_l())
52     return daddy_grav_l()->get_staff_info();
53   Staff_info info;
54   return info;
55 }
56
57
58 IMPLEMENT_IS_TYPE_B1(Engraver, Translator);
59
60
61 Engraver_group_engraver*
62 Engraver::daddy_grav_l () const
63 {
64   return (daddy_trans_l_ )
65        ? (Engraver_group_engraver*) daddy_trans_l_->access_Engraver  ()
66        : 0;
67 }