-
-void
-Timing_translator::do_pre_move_processing()
-{
- timing_req_l_arr_.set_size (0);
- Translator *t = this;
- Global_translator *global_l =0;
- do
- {
- t = t->daddy_trans_l_ ;
- global_l = dynamic_cast<Global_translator*> (t);
- }
- while (!global_l);
-
- /* allbars == ! skipbars */
- SCM sb = get_property ("skipBars", 0);
- bool allbars = !(gh_boolean_p (sb)&&gh_scm2bool (sb));
-
- // urg: multi bar rests: should always process whole of first bar?
- SCM tim = get_property ("timing", 0);
- bool timb = gh_boolean_p (tim) && gh_scm2bool (tim);
- if (timb && allbars)
- {
- Moment barleft = (measure_length () - measure_position ());
-
- if (barleft < Moment (0))
- barleft = 0;
-
- global_l->add_moment_to_process (now_mom () + barleft);
- }
-}
-
-
-ADD_THIS_TRANSLATOR(Timing_translator);
-