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.11.6-1~27
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=f3612db9b8f979653df58ad0a55efa5e9004d5b1;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 ebb322d773..d895d41d62 100644
--- a/lily/parser.yy
+++ b/lily/parser.yy
@@ -975,7 +975,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 {
@@ -1609,7 +1609,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); }
 	;