From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Sat, 30 Dec 2006 12:35:20 +0000 (+0100)
Subject: Negative quote count for low quotes (,) in octave check. Fixes #201
X-Git-Tag: release/2.10.6-1~10
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a1a67537f3a6c17f48408932f533f1d1b08b97a6;p=lilypond.git

Negative quote count for low quotes (,) in octave check. Fixes #201
---

diff --git a/lily/parser.yy b/lily/parser.yy
index a075649481..2d9cbdf992 100644
--- a/lily/parser.yy
+++ b/lily/parser.yy
@@ -976,7 +976,7 @@ prefix_composite_music:
 	generic_prefix_music_scm {
 		$$ = run_music_function (PARSER, $1);
 	}
-	| CONTEXT    simple_string optional_id optional_context_mod music {
+	| CONTEXT simple_string optional_id optional_context_mod music {
 		$$ = MAKE_SYNTAX ("context-specification", @$, $2, $3, $5, $4, SCM_BOOL_F);
 	}
 	| NEWCONTEXT simple_string optional_id optional_context_mod music {
@@ -1610,7 +1610,7 @@ direction_reqd_event:
 octave_check:
 	/**/ { $$ = SCM_EOL; }
 	| '='  { $$ = scm_from_int (0); }
-	| '=' sub_quotes { $$ = scm_from_int ($2); }
+	| '=' sub_quotes { $$ = scm_from_int (-$2); }
 	| '=' sup_quotes { $$ = scm_from_int ($2); }
 	;