+ Music *chm = MY_MAKE_MUSIC ("UnrelativableMusic");
+ chm->set_property ("element", $2->self_scm ());
+ $$ = chm;
+ scm_gc_unprotect_object ($2->self_scm ());
+ }
+ else
+ {
+ $$ = $2;
+ }
+ THIS->lexer_->pop_state ();
+ }
+ | mode_changing_head_with_context optional_context_mod Grouped_music_list {
+ $$ = context_spec_music ($1, get_next_unique_context_id (),
+ $3, $2);
+ if ($1 == ly_symbol2scm ("ChordNames"))
+ {
+ Music *chm = MY_MAKE_MUSIC ("UnrelativableMusic");
+ chm->set_property ("element", $$->self_scm ());
+ scm_gc_unprotect_object ($$->self_scm ());
+ $$ = chm;
+ }
+ THIS->lexer_->pop_state ();
+ }
+ | relative_music { $$ = $1; }
+ | re_rhythmed_music { $$ = $1; }
+ | TAG embedded_scm Music {
+ tag_music ($3, $2, THIS->here_input ());
+ $$ = $3;
+ }
+ ;
+
+mode_changing_head:
+ NOTEMODE {