From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Thu, 24 Jul 2003 21:08:11 +0000 (+0000)
Subject: (TabStaffContext, TabVoiceContext): Add.
X-Git-Tag: release/1.7.30~84
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=2c0e5a33e76674fa829f836ba1a196eb0af37e17;p=lilypond.git

(TabStaffContext, TabVoiceContext): Add.
This fixes core dump on MIDI ouput (Simon Weatherill).
---

diff --git a/ChangeLog b/ChangeLog
index 6067289661..b9d10f3531 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2003-07-24  Jan Nieuwenhuizen  <janneke@gnu.org>
 
+	* ly/performer-init.ly (TabStaffContext, TabVoiceContext): Add.
+	This fixes core dump on MIDI ouput (Simon Weatherill).
+
 	* stepmake/stepmake/generic-targets.make (WWW-post): Oops, depend
 	on local-WWW-post.
 
diff --git a/ly/performer-init.ly b/ly/performer-init.ly
index 3750dbce19..64244f1981 100644
--- a/ly/performer-init.ly
+++ b/ly/performer-init.ly
@@ -1,4 +1,4 @@
-\version "1.7.18"
+s\version "1.7.18"
 
 %
 % setup for Request->Element conversion. Guru-only
@@ -49,6 +49,18 @@ PianoStaffContext = \translator {
 	\accepts Staff
 }
 
+TabVoiceContext = \translator {
+        \type "Performer_group_performer"
+	\name "TabVoice"
+	\consists "Swallow_performer"
+}
+
+TabStaffContext = \translator {
+        \type "Performer_group_performer"
+	\name "TabStaff"
+	\accepts "TabVoice"
+}
+
 ScoreContext = \translator {
 	\type "Score_performer"
 
@@ -58,6 +70,7 @@ ScoreContext = \translator {
 	\accepts Staff
 	\accepts GrandStaff
 	\accepts PianoStaff
+	\accepts TabStaff
 	\accepts Lyrics 
 	\accepts StaffGroup
 	\accepts ChoirStaff
@@ -85,7 +98,8 @@ ScoreContext = \translator {
 	\name ChoirStaff
 	\accepts Staff
 }
-\translator { 
+
+\translator {
 	\type "Staff_performer"
 	\accepts LyricsVoice
 	\name Lyrics
@@ -117,8 +131,10 @@ ScoreContext = \translator {
 \translator { \ScoreContext }
 \translator { \StaffContext }
 \translator { \StaffContext \name RhythmicStaff }
+\translator { \TabVoiceContext }
 \translator { \VoiceContext }
 \translator { \ThreadContext }
 \translator { \PianoStaffContext }
+\translator { \TabStaffContext }
 \translator { \GrandStaffContext }
 \translator { \FiguredBassContext }