Fix some bugs in the dynamic engraver and PostScript backend

[lilypond.git] / ly / performer-init.ly

diff --git a/ly/performer-init.ly b/ly/performer-init.ly
index 06a01c1ed57bd9d9d202cf10f4eb392d34f06135..d22c42277531198414fcad979d63ea8ef534905a 100644 (file)
--- a/ly/performer-init.ly
+++ b/ly/performer-init.ly
@@ -1,13 +1,15 @@
-\version "2.1.36"
+\version "2.7.39"
 
-                               %
-                               % setup for Request->Element conversion. Guru-only
-                               %
+%%
+%% setup for Request->Element conversion. 
+%%
 \context {
-    \type "Staff_performer"
+    \type "Performer_group"
     \name Staff
     \accepts Voice
-
+    \defaultchild Voice
+    
+    \consists "Staff_performer"
     \consists "Key_performer"
     \consists "Tempo_performer"
     \consists "Time_signature_performer"
@@ -17,18 +19,21 @@
     \accepts Score
 \description "Hard coded entry point for LilyPond. Cannot be tuned."
     }
+
 \context {
-    \StaffContext
+    \Staff
     \name DrumStaff
     midiInstrument = #"drums"
     \accepts DrumVoice
+    \defaultchild DrumVoice
 }
 
 \context {
-    \type "Performer_group_performer"
+    \type "Performer_group"
     \name Voice
-    \consists "Dynamic_performer"
+    % The order of the dynamic performers is significant: absolute dynamic events must override crescendo events in midi.
     \consists "Span_dynamic_performer"
+    \consists "Dynamic_performer"
     \consists "Tie_performer"
     \consists "Piano_pedal_performer"
     \consists "Note_performer"
@@ -37,49 +42,57 @@
     \consists "Melisma_translator"
 }
 
+\context {
+  \Voice
+  \name CueVoice
+  \alias Voice
+}
 
 \context {
-    \VoiceContext
+    \Voice
     \remove "Note_performer"
     \consists "Drum_note_performer" 
     \name DrumVoice
 }
 
 \context {
-    \type "Performer_group_performer"
+    \type "Performer_group"
     \name FiguredBass 
     \consists "Swallow_performer"
 }
 
 \context {
-    \type "Performer_group_performer"
+    \type "Performer_group"
     \name GrandStaff
     \accepts RhythmicStaff
     \accepts Staff
+    \defaultchild Staff
 }
 
 \context {
-    \type "Performer_group_performer"
+    \type "Performer_group"
     \name "PianoStaff"
     \accepts Staff
     \accepts DrumStaff
+    \defaultchild Staff
 }
 
 \context {
-    \type "Performer_group_performer"
+    \type "Performer_group"
     \name "TabVoice"
     \consists "Swallow_performer"
 }
 
 \context {
-    \type "Performer_group_performer"
+    \type "Performer_group"
     \name "Devnull"
     \consists "Swallow_performer"
 }
 \context {
-    \type "Performer_group_performer"
+    \type "Performer_group"
     \name "TabStaff"
     \accepts "TabVoice"
+    \defaultchild "TabVoice"
 }
 
 \context {
@@ -105,15 +118,19 @@
     
     \consists "Timing_translator"
     \consists "Swallow_performer"
+
+    \defaultchild "Staff"
     
     dynamicAbsoluteVolumeFunction = #default-dynamic-absolute-volume
     instrumentEqualizer = #default-instrument-equalizer
-    drumPitchTable = #(alist->hash-table midiDrumPitches) 
+    drumPitchTable = #(alist->hash-table midiDrumPitches)
+    timing = ##t 
 }
 
 
 \context {
-    \type "Staff_performer" % Performer_group_performer ?
+    \type "Performer_group"
+    \consists "Staff_performer" % Performer_group ?
     \consists "Lyric_performer"
     \name Lyrics
     \consists "Time_signature_performer"
@@ -121,33 +138,39 @@
 }
 
 \context{
-    \type "Performer_group_performer"
+    \type "Performer_group"
     \name ChoirStaff
     \accepts Staff
     \accepts DrumStaff
+    \defaultchild Staff
+
 }
 
 
+
 \context {
-    \type "Staff_performer"
+    \type "Performer_group"
+    \consists "Staff_performer"
     \accepts ChordNameVoice
     \name ChordNames
 }
 
 \context {
-    \type "Performer_group_performer"
+    \type "Performer_group"
     \consists "Note_performer"
     \name ChordNameVoice       
 }
 
 \context {
-    \type "Performer_group_performer"
+    \type "Performer_group"
 
     \name StaffGroup
     \accepts Staff
     \accepts DrumStaff
+
+    \defaultchild Staff
 }
 
-\context { \StaffContext \name RhythmicStaff }
+\context { \Staff \name RhythmicStaff }