lily/staff-sym-engraver.cc

   1 /*
   2   staff-sym-reg.cc -- implement Staff_symbol_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 "staff-sym-engraver.hh"
  10 #include "staff-symbol.hh"
  11 #include "score.hh"
  12 #include "paper-column.hh"
  13 #include "staff-symbol-referencer.hh"
  14 #include "paper-def.hh"
  15
  16 Staff_symbol_engraver::~Staff_symbol_engraver()
  17 {
  18   assert (!span_p_);
  19 }
  20
  21 Staff_symbol_engraver::Staff_symbol_engraver()
  22 {
  23    span_p_ = 0;
  24 }
  25
  26 void
  27 Staff_symbol_engraver::do_creation_processing()
  28 {
  29   span_p_ = new Staff_symbol;
  30   span_p_->set_bounds(LEFT,get_staff_info().command_pcol_l ());
  31   announce_element (Score_element_info (span_p_, 0));
  32 }
  33
  34 void
  35 Staff_symbol_engraver::do_removal_processing()
  36 {
  37   Scalar l (get_property ("numberOfStaffLines", 0));
  38   if (l.isnum_b ())
  39     {
  40       span_p_->no_lines_i_ = l;
  41     }
  42
  43   Scalar sz (get_property ("staffLineLeading", 0));
  44   if (!sz.empty_b () && sz.isnum_b ())
  45     {
  46       span_p_->staff_line_leading_f_ = Real(sz);
  47     }
  48   else
  49     {
  50       span_p_->staff_line_leading_f_ = paper_l ()->get_realvar (interline_scm_sym);
  51     }
  52   span_p_->set_bounds(RIGHT,get_staff_info().command_pcol_l ());
  53   typeset_element (span_p_);
  54   span_p_ =0;
  55 }
  56
  57 void
  58 Staff_symbol_engraver::acknowledge_element (Score_element_info s)
  59 {
  60   if (Staff_symbol_referencer * st = dynamic_cast<Staff_symbol_referencer*> (s.elem_l_))
  61     {
  62       st->set_staff_symbol (span_p_);
  63     }
  64 }
  65
  66
  67 ADD_THIS_TRANSLATOR(Staff_symbol_engraver);