From 0c97ca7297c6c5667e5c6f2deedf88c737f3f4d3 Mon Sep 17 00:00:00 2001
From: David Kastrup <dak@gnu.org>
Date: Thu, 22 Sep 2011 14:25:01 +0200
Subject: [PATCH] Revert "parser.yy: Eliminate composite_music by rather using
 closed_music"

This reverts commit 6c3445a0791831d450573cf583da36aecac5322c.
---
 lily/parser.yy | 17 +++++++++++------
 1 file changed, 11 insertions(+), 6 deletions(-)

diff --git a/lily/parser.yy b/lily/parser.yy
index 43e963fafe..82df956fa8 100644
--- a/lily/parser.yy
+++ b/lily/parser.yy
@@ -326,6 +326,7 @@ If we give names, Bison complains.
 %type <i> tremolo_type
 
 /* Music */
+%type <scm> composite_music
 %type <scm> grouped_music_list
 %type <scm> braced_music_list
 %type <scm> closed_music
@@ -516,7 +517,7 @@ toplevel_expression:
 		scm_call_2 (proc, PARSER->self_scm (), score->self_scm ());
 		score->unprotect ();
 	}
-	| closed_music {
+	| composite_music {
 		Music *music = unsmob_music ($1);
 		SCM proc = PARSER->lexer_->lookup_identifier ("toplevel-music-handler");
 		scm_call_2 (proc, PARSER->self_scm (), music->self_scm ());
@@ -767,7 +768,7 @@ book_body:
 		scm_call_2 (proc, $$->self_scm (), score->self_scm ());
 		score->unprotect ();
 	}
-	| book_body closed_music {
+	| book_body composite_music {
 		Music *music = unsmob_music ($2);
 		SCM proc = PARSER->lexer_->lookup_identifier ("book-music-handler");
 		scm_call_3 (proc, PARSER->self_scm (), $$->self_scm (), music->self_scm ());
@@ -820,7 +821,7 @@ bookpart_body:
 		scm_call_2 (proc, $$->self_scm (), score->self_scm ());
 		score->unprotect ();
 	}
-	| bookpart_body closed_music {
+	| bookpart_body composite_music {
 		Music *music = unsmob_music ($2);
 		SCM proc = PARSER->lexer_->lookup_identifier ("bookpart-music-handler");
 		scm_call_3 (proc, PARSER->self_scm (), $$->self_scm (), music->self_scm ());
@@ -1007,8 +1008,7 @@ braced_music_list:
 
 music:
 	simple_music
-	| prefix_composite_music { $$ = $1; }
-	| grouped_music_list { $$ = $1; }
+	| composite_music
 	| MUSIC_IDENTIFIER
 	;
 
@@ -1088,6 +1088,11 @@ context_mod_list:
         }
         ;
 
+composite_music:
+	prefix_composite_music { $$ = $1; }
+	| grouped_music_list { $$ = $1; }
+	;
+
 /* Music that can't be followed by additional events or durations */
 closed_music:
 	MUSIC_IDENTIFIER
@@ -1287,7 +1292,7 @@ relative_music:
 		Pitch start = *unsmob_pitch ($2);
 		$$ = make_music_relative (start, $3, @$);
 	}
-	| RELATIVE closed_music {
+	| RELATIVE composite_music {
 		Pitch middle_c (0, 0, 0);
 		$$ = make_music_relative (middle_c, $2, @$);
 	}
-- 
2.39.5