]> git.donarmstrong.com Git - lilypond.git/blob - lily/staff-symbol-engraver.cc
2003 -> 2004
[lilypond.git] / lily / staff-symbol-engraver.cc
1 /*
2   staff-symbol-engraver.cc -- implement Staff_symbol_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1997--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9
10 #include "score.hh"
11 #include "paper-column.hh"
12 #include "paper-def.hh"
13 #include "side-position-interface.hh"
14 #include "engraver.hh"
15 #include "moment.hh"
16
17 /**
18   Manage the staff symbol.
19  */
20 class Staff_symbol_engraver : public Engraver { 
21   Spanner *span_;
22 public:
23   TRANSLATOR_DECLARATIONS(Staff_symbol_engraver);
24   
25 protected:
26   virtual ~Staff_symbol_engraver ();
27   virtual void acknowledge_grob (Grob_info);
28   virtual void finalize ();
29   virtual void process_music ();
30 };
31
32
33 Staff_symbol_engraver::~Staff_symbol_engraver ()
34 {
35   assert (!span_);
36 }
37
38 Staff_symbol_engraver::Staff_symbol_engraver ()
39 {
40   span_ = 0;
41 }
42
43 void
44 Staff_symbol_engraver::process_music ()
45 {
46   if (!span_)
47     {
48       span_ = make_spanner ("StaffSymbol");
49   
50       span_->set_bound (LEFT, unsmob_grob (get_property ("currentCommandColumn")));
51
52       announce_grob(span_, SCM_EOL);
53     }
54 }
55
56 void
57 Staff_symbol_engraver::finalize ()
58 {
59   if (span_)
60     {
61       span_->set_bound (RIGHT,unsmob_grob (get_property ("currentCommandColumn")));
62       typeset_grob (span_);
63     }
64   span_ =0;
65 }
66
67 void
68 Staff_symbol_engraver::acknowledge_grob (Grob_info s)
69 {
70   s.grob_->set_grob_property ("staff-symbol", span_->self_scm ());
71
72   // remove this. probly not necessary?
73   s.grob_->add_dependency (span_); // UGH. UGH. UGH
74 }
75
76
77
78
79 ENTER_DESCRIPTION(Staff_symbol_engraver,
80 /* descr */       "create the constellation of five (default) "
81 "staff lines.",
82 /* creats*/       "StaffSymbol",
83 /* accepts */     "",
84 /* acks  */      "grob-interface",
85 /* reads */       "",
86 /* write */       "");