-
- daddy_trans_->set_property ("timing" , SCM_BOOL_T);
- daddy_trans_->set_property ("currentBarNumber" , gh_int2scm (1));
-
- daddy_trans_->set_property ("timeSignatureFraction",
- gh_cons (gh_int2scm (4), gh_int2scm (4)));
- daddy_trans_->set_property ("measurePosition", Moment (Rational (0)).smobbed_copy ());
- daddy_trans_->set_property ("measureLength", Moment (Rational (1)).smobbed_copy ());
- daddy_trans_->set_property ("beatLength", Moment (Rational (1,4)).smobbed_copy ());
+ context ()->add_alias (ly_symbol2scm ("Timing"));
+ context ()->set_property ("timing" , SCM_BOOL_T);
+ context ()->set_property ("currentBarNumber" , scm_int2num (1));
+
+ context ()->set_property ("timeSignatureFraction",
+ scm_cons (scm_int2num (4), scm_int2num (4)));
+ /*
+ Do not init measurePosition; this should be done from global
+ context.
+ */
+ context ()->set_property ("measureLength", Moment (Rational (1)).smobbed_copy ());
+ context ()->set_property ("beatLength", Moment (Rational (1, 4)).smobbed_copy ());