lily/span-score-bar-engraver.cc

   1 /*
   2   span-score-bar-engraver.cc -- implement Span_score_bar_engraver,
   3   Piano_bar_engraver and Staff_group_bar_engraver
   4
   5   source file of the GNU LilyPond music typesetter
   6
   7   (c)  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   8 */
   9
  10 #include "span-bar.hh"
  11 #include "span-score-bar-engraver.hh"
  12 #include "paper-def.hh"
  13
  14 Span_bar*
  15 Span_score_bar_engraver::get_span_bar_p () const
  16 {
  17   Span_bar*s =  new Span_bar;
  18   s->type_str_ = "scorebar";
  19   s->set_elt_property (break_priority_scm_sym,
  20                        gh_int2scm (-4));
  21
  22   return s;
  23 }
  24
  25
  26 Span_score_bar_engraver::Span_score_bar_engraver ()
  27 {
  28   use_priority_b_ = true;
  29   break_priority_i_ = -4;
  30 }
  31
  32 Span_bar*
  33 Piano_bar_engraver::get_span_bar_p () const
  34 {
  35   Span_bar *s= new Span_bar;
  36   s->dim_cache_[X_AXIS]->set_empty (true);
  37   s->type_str_ = "brace";
  38   return s;
  39 }
  40
  41 Span_bar*
  42 Staff_group_bar_engraver::get_span_bar_p () const
  43 {
  44   Span_bar *s= new Span_bar;
  45   s->dim_cache_[X_AXIS]->set_empty (true);
  46   s->type_str_ = "bracket";
  47   return s;
  48 }
  49
  50 void
  51 Staff_group_bar_engraver::acknowledge_element (Score_element_info i)
  52 {
  53   Base_span_bar_engraver::acknowledge_element (i);
  54   if (Span_bar * b = dynamic_cast<Span_bar *> (i.elem_l_))
  55     {
  56       if (b->type_str_ == "brace")
  57         b->translate_axis ( -paper_l ()->get_realvar (interline_scm_sym),
  58                             X_AXIS); // ugh
  59     }
  60 }
  61
  62 ADD_THIS_TRANSLATOR (Piano_bar_engraver);
  63 ADD_THIS_TRANSLATOR (Staff_group_bar_engraver);
  64 ADD_THIS_TRANSLATOR (Span_score_bar_engraver);
  65