Issue 3618/1: Eliminate EXPECT_PITCH token in parser

[lilypond.git] / lily / lexer.ll

diff --git a/lily/lexer.ll b/lily/lexer.ll
index 9a859e5a6a9f4852442eb9b98c7f3355017e35aa..7044f100c892f5ded67f204ff53f8b07eb0c8134 100644 (file)
--- a/lily/lexer.ll
+++ b/lily/lexer.ll
@@ -1025,9 +1025,7 @@ Lily_lexer::scan_scm_id (SCM sid)
                                cs = SCM_CAR (cs);
                        }
                        
-                       if (cs == Pitch_type_p_proc)
-                               push_extra_token (EXPECT_PITCH);
-                       else if (cs == Duration_type_p_proc)
+                       if (cs == Duration_type_p_proc)
                                push_extra_token (EXPECT_DURATION);
                        else if (ly_is_procedure (cs))
                                push_extra_token (EXPECT_SCM, cs);