- daddy_trans_l_->set_property ("timing" , SCM_BOOL_T);
- daddy_trans_l_->set_property ("currentBarNumber" , gh_int2scm (1));
-
- daddy_trans_l_->set_property ("timeSignatureFraction",
- gh_cons (gh_int2scm (4), gh_int2scm (4)));
- daddy_trans_l_->set_property ("measurePosition", Moment (Rational (0)).smobbed_copy ());
- daddy_trans_l_->set_property ("measureLength", Moment (Rational (1)).smobbed_copy ());
- daddy_trans_l_->set_property ("beatLength", Moment (Rational (1,4)).smobbed_copy ());
+ context ()->add_alias (ly_symbol2scm ("Timing"));
+ context ()->set_property ("currentBarNumber", scm_from_int (1));
+ context ()->set_property ("internalBarNumber", scm_from_int (1));
+
+ context ()->set_property ("timeSignatureFraction",
+ scm_cons (scm_from_int (4), scm_from_int (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 ());