X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fperformer-init.ly;h=b48bd5454d01ba1b6ca7c53d4ff44ae7300e5f18;hb=f0781acda2e0c2ef936a2c4c2f90b57f989faf6c;hp=a356de36027871012ad5b50065ea10f960f5ba7d;hpb=98e7b0a30008cfea6e80b69e2d94c41ea4cd0f02;p=lilypond.git

diff --git a/ly/performer-init.ly b/ly/performer-init.ly
index a356de3602..b48bd5454d 100644
--- a/ly/performer-init.ly
+++ b/ly/performer-init.ly
@@ -1,93 +1,122 @@
-\version "2.1.19"
+\version "2.10.0"
 
-				%
-				% setup for Request->Element conversion. Guru-only
-				%
-\translator {
-    \type "Staff_performer"
+%%
+%% setup for Request->Element conversion. 
+%%
+\context {
+    \type "Performer_group"
     \name Staff
     \accepts Voice
-
+    \accepts CueVoice
+    \defaultchild Voice
+    
+    \consists "Staff_performer"
     \consists "Key_performer"
-    \consists "Tempo_performer"
-    \consists "Time_signature_performer"
-
 }
-\translator {
-    \StaffContext
+\context {
+    \name Global
+    \accepts Score
+\description "Hard coded entry point for LilyPond. Cannot be tuned."
+    }
+
+\context {
+    \Staff
     \name DrumStaff
     midiInstrument = #"drums"
     \accepts DrumVoice
+    \defaultchild DrumVoice
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name Voice
-    \consists "Dynamic_performer"
-    \consists "Span_dynamic_performer"
+    \consists "Dynamic_performer"    
     \consists "Tie_performer"
     \consists "Piano_pedal_performer"
+    \consists "Note_performer"
+    \consists "Beam_performer"
+    \consists "Slur_performer"
+}
+
+\context {
+  \Voice
+  \name CueVoice
+  \alias Voice
 }
 
-\translator {
-    \VoiceContext
+\context {
+  \Voice
+  \name VaticanaVoice
+  \alias Voice
+}
+
+\context {
+    \Voice
     \remove "Note_performer"
     \consists "Drum_note_performer" 
     \name DrumVoice
 }
 
-\translator {
-    \type "Performer_group_performer"
-    \name Voice
-    \consists "Note_performer"
-    \consists "Beam_performer"
-    \consists "Melisma_performer"
-}
-
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name FiguredBass 
     \consists "Swallow_performer"
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name GrandStaff
     \accepts RhythmicStaff
     \accepts Staff
+    \defaultchild Staff
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name "PianoStaff"
     \accepts Staff
     \accepts DrumStaff
+    \defaultchild Staff
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name "TabVoice"
     \consists "Swallow_performer"
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name "Devnull"
     \consists "Swallow_performer"
 }
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name "TabStaff"
     \accepts "TabVoice"
+    \defaultchild "TabVoice"
+}
+
+\context {
+    \type "Performer_group"
+    \name "VaticanaStaff"
+    \alias "Staff"
+    \denies "Voice"
+    \accepts "VaticanaVoice"
+    \defaultchild "VaticanaVoice"
 }
 
-\translator {
+\context {
     \type "Score_performer"
 
     \name Score
-    \alias Timing
+    
     melismaBusyProperties = #default-melisma-properties
-    instrument = #"bright acoustic"
+    instrumentName = #"bright acoustic"
+
+    %% quarter = 60
+    tempoWholesPerMinute = #(ly:make-moment 15 1)
+    
     \accepts Staff
     \accepts DrumStaff
     \accepts GrandStaff
@@ -100,53 +129,72 @@
     \accepts RhythmicStaff
     \accepts ChordNames
     \accepts FiguredBass
-    \accepts LyricsVoice
-    \alias "Timing"
+    \accepts Lyrics
+    \accepts VaticanaStaff
+
+    \consists "Time_signature_performer"
+    \consists "Control_track_performer"
+    \consists "Tempo_performer"
     \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 
 }
 
 
-\translator {
-    \type "Staff_performer" % Performer_group_performer ?
+\context {
+    \type "Performer_group"
+    \consists "Staff_performer" % Performer_group ?
     \consists "Lyric_performer"
-    \name LyricsVoice
-    \consists "Time_signature_performer"
-    \consists "Tempo_performer"
+    \name Lyrics
 }
 
-\translator{
-    \type "Performer_group_performer"
+\context{
+    \type "Performer_group"
     \name ChoirStaff
     \accepts Staff
     \accepts DrumStaff
+    \defaultchild Staff
+
 }
 
 
-\translator {
-    \type "Staff_performer"
+
+\context {
+    \type "Performer_group"
+    \consists "Staff_performer"
     \accepts ChordNameVoice
     \name ChordNames
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \consists "Note_performer"
     \name ChordNameVoice	
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
 
     \name StaffGroup
     \accepts Staff
     \accepts DrumStaff
+    \accepts TabStaff
+    \accepts RhythmicStaff
+    \accepts GrandStaff
+    \accepts PianoStaff
+    \accepts Lyrics
+    \accepts ChordNames
+    \accepts FiguredBass
+
+    \defaultchild Staff
 }
 
-\translator { \StaffContext \name RhythmicStaff }
+\context { \Staff \name RhythmicStaff }