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 #include "staff-side.hh"
  16
  17 Staff_symbol_engraver::~Staff_symbol_engraver()
  18 {
  19   assert (!span_p_);
  20 }
  21
  22 Staff_symbol_engraver::Staff_symbol_engraver()
  23 {
  24    span_p_ = 0;
  25 }
  26
  27 void
  28 Staff_symbol_engraver::do_creation_processing()
  29 {
  30   span_p_ = new Staff_symbol;
  31   span_p_->set_bounds(LEFT,get_staff_info().command_pcol_l ());
  32   announce_element (Score_element_info (span_p_, 0));
  33 }
  34
  35 void
  36 Staff_symbol_engraver::do_removal_processing()
  37 {
  38   SCM l (get_property ("numberOfStaffLines", 0));
  39   if (gh_number_p(l))
  40     {
  41       span_p_->no_lines_i_ = gh_scm2int (l);
  42     }
  43
  44   SCM sz (get_property ("staffLineLeading", 0));
  45   if (gh_number_p(sz))
  46     {
  47       span_p_->staff_line_leading_f_ = gh_scm2double (sz);
  48     }
  49   else
  50     {
  51       span_p_->staff_line_leading_f_ = paper_l ()->get_var ("interline");
  52     }
  53   span_p_->set_bounds(RIGHT,get_staff_info().command_pcol_l ());
  54   typeset_element (span_p_);
  55   span_p_ =0;
  56 }
  57
  58 void
  59 Staff_symbol_engraver::acknowledge_element (Score_element_info s)
  60 {
  61   s.elem_l_->set_elt_property ("staff-symbol", span_p_->self_scm_);
  62   s.elem_l_->add_dependency (span_p_); // UGH. UGH. UGH
  63
  64   SCM ss =s.elem_l_->remove_elt_property ("staff-support");
  65   if (gh_boolean_p (ss) && gh_scm2bool (ss))
  66     {
  67       Side_position_interface si (s.elem_l_);
  68       if (si.is_staff_side_b ())
  69         si.add_support (span_p_);
  70     }
  71 }
  72
  73
  74 ADD_THIS_TRANSLATOR(Staff_symbol_engraver);
  75