X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fperformer-init.ly;h=98ae0ceb8f6bfffe46783dc4b493d2ec43462d40;hb=2f84bbe9a6dc6ca2d9a49eae0bf094744e47f11d;hp=62a2a83a9242915202741e0c835d3ca9edec0043;hpb=08560a1b8076630c4fc6cb9b902614d8b74fd6fc;p=lilypond.git

diff --git a/ly/performer-init.ly b/ly/performer-init.ly
index 62a2a83a92..98ae0ceb8f 100644
--- a/ly/performer-init.ly
+++ b/ly/performer-init.ly
@@ -160,6 +160,23 @@
   \consists "Time_signature_performer"
   \consists "Control_track_performer"
   \consists "Tempo_performer"
+
+  \alias "Timing"
+
+  %% An alias for Timing is established by the Timing_translator in
+  %% whatever context it is initialized, and the timing variables are
+  %% then copied from wherever Timing had been previously established.
+  %% The alias at Score level provides a target for initializing
+  %% Timing variables in layout definitions before any
+  %% Timing_translator has been run.
+
+  timeSignatureFraction = #'(4 . 4)
+
+%% These defaults should be the same as the rules established in
+%%   scm/time-signature-settings.scm for 4/4 time
+  measureLength = #(ly:make-moment 4 4)
+  baseMoment = #(ly:make-moment 1  4)
+
   \consists "Timing_translator"
 
   \defaultchild "Staff"