]> git.donarmstrong.com Git - lilypond.git/blob - lily/bar-number-engraver.cc
patch::: 1.3.18.jcn1
[lilypond.git] / lily / bar-number-engraver.cc
1 /*
2   bar-number-grav.cc -- implement Bar_number_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 "bar-number-engraver.hh"
10 #include "timing-translator.hh"
11 #include "timing-engraver.hh"
12 #include "engraver-group-engraver.hh"
13 #include "text-item.hh"
14
15 ADD_THIS_TRANSLATOR (Bar_number_engraver);
16
17 Bar_number_engraver::Bar_number_engraver()
18 {
19   axis_ = Y_AXIS;
20   type_ = "barNumber";
21   visibility_lambda_
22     = ly_eval_str ("postbreak-only-visibility");
23 }
24
25 void
26 Bar_number_engraver::do_process_requests ()
27 {
28   Translator *tr = daddy_grav_l ()->get_simple_translator ("Timing_engraver");
29   Timing_translator *time = dynamic_cast<Timing_translator*>(tr);
30
31   // todo include (&&!time->cadenza_b_ )
32   SCM bn = get_property("currentBarNumber",0);
33
34   if (gh_number_p (bn) &&
35       !time->measure_position () && now_mom () > Moment (0))
36     {
37       create_items (0);
38
39       // guh.
40       text_p_->set_elt_property ("text",
41                                  ly_str02scm (to_str (gh_scm2int (bn)).ch_C()));
42                                  
43     }
44 }