lily/staff-regs.cc

   1 /*
   2   staff-regs.cc -- implement Staff_registers
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7 */
   8
   9 #include "staff-sym.hh"
  10 #include "voice-group-regs.hh"
  11 #include "voice-regs.hh"
  12 #include "staff-regs.hh"
  13 #include "command-request.hh"
  14 #include "bar.hh"
  15 #include "debug.hh"
  16 #include "input-register.hh"
  17 #include "meter-reg.hh"
  18 #include "staffline.hh"
  19
  20
  21 Staff_registers::Staff_registers()
  22 {
  23     staffline_p_ =0;
  24 }
  25
  26 void
  27 Staff_registers::typeset_element(Score_elem *elem_p)
  28 {
  29     staff_elem_l_arr_.push(elem_p);
  30     Register_group_register::typeset_element(elem_p);
  31 }
  32
  33 void
  34 Staff_registers::typeset_breakable_item( Item * nobreak_p)
  35 {
  36     staff_elem_l_arr_.push(nobreak_p);
  37     Register_group_register::typeset_breakable_item(nobreak_p);
  38 }
  39
  40 void
  41 Staff_registers::do_pre_move_processing()
  42 {
  43     Register_group_register::do_pre_move_processing();
  44     group_staff_elems();
  45 }
  46
  47 void
  48 Staff_registers::group_staff_elems()
  49 {
  50     for (int i=0; i <staff_elem_l_arr_.size(); i++)
  51         staffline_p_->add_element(staff_elem_l_arr_[i]);
  52     staff_elem_l_arr_.set_size(0);
  53 }
  54
  55 void
  56 Staff_registers::do_removal_processing()
  57 {
  58     /* this is a "destructor type function", first do children, then self. */
  59     Register_group_register::do_removal_processing();
  60     group_staff_elems();
  61
  62     staffline_p_->right_col_l_ = get_staff_info().command_pcol_l();
  63     Request_register::typeset_element(staffline_p_);
  64     staffline_p_ = 0;
  65 }
  66
  67 void
  68 Staff_registers::do_creation_processing()
  69 {
  70     staffline_p_ = new Line_of_staff;
  71     staffline_p_->left_col_l_ = get_staff_info().command_pcol_l();
  72
  73     // don't broadcast to self.
  74     Request_register::announce_element(Score_elem_info(staffline_p_,0));
  75     Register_group_register::do_creation_processing();
  76 }
  77
  78
  79 IMPLEMENT_STATIC_NAME(Staff_registers);
  80 IMPLEMENT_IS_TYPE_B1(Staff_registers,Register_group_register);
  81 ADD_THIS_REGISTER(Staff_registers);
  82