Parser: remove pitch_arg and PITCH_ARG

diff --git a/lily/parser.yy b/lily/parser.yy
index e20b9f11cc58cf3b51ed0b0bf411be0769db7198..0d5f055c36ab4364e4e71bae46a62cd1871b12ad 100644 (file)
--- a/lily/parser.yy
+++ b/lily/parser.yy
@@ -336,7 +336,6 @@ If we give names, Bison complains.
 %token CONTEXT_MOD_IDENTIFIER
 %token DRUM_PITCH
 %token PITCH_IDENTIFIER
-%token PITCH_ARG
 %token DURATION_IDENTIFIER
 %token EVENT_IDENTIFIER
 %token EVENT_FUNCTION
@@ -1713,11 +1712,6 @@ function_arglist_backup:
                                               (parser, @3, $3),
                                               $1, $2);
        }
-       | function_arglist_backup REPARSE pitch_arg
-       {
-               $$ = check_scheme_arg (parser, @3,
-                                      $3, $1, $2);
-       }               
        | function_arglist_backup REPARSE bare_number_common
        {
                $$ = check_scheme_arg (parser, @3,
@@ -2754,17 +2748,6 @@ pitch:
        }
        ;
 
-pitch_arg:
-       PITCH_ARG quotes {
-                if (!scm_is_eq (SCM_INUM0, $2))
-                {
-                        Pitch p = *unsmob_pitch ($1);
-                        p = p.transposed (Pitch (scm_to_int ($2),0,0));
-                        $$ = p.smobbed_copy ();
-                }
-       }
-       ;
-
 gen_text_def:
        full_markup {
                Music *t = MY_MAKE_MUSIC ("TextScriptEvent", @$);