From: David Kastrup <dak@gnu.org> Date: Mon, 18 Nov 2013 13:59:35 +0000 (+0100) Subject: parser: allow Scheme expressions for unsigned_number X-Git-Tag: release/2.17.96-1~5 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=c306a853e5a902af7f835719e2a11121b4e15bdc;p=lilypond.git parser: allow Scheme expressions for unsigned_number --- diff --git a/lily/parser.yy b/lily/parser.yy index b9470614e8..1bab8b14fd 100644 --- a/lily/parser.yy +++ b/lily/parser.yy @@ -3348,6 +3348,15 @@ unsigned_number: $$ = SCM_INUM0; } } + | embedded_scm + { + if (!scm_is_integer ($1) + || scm_is_true (scm_negative_p ($1))) + { + parser->parser_error (@1, _("not an unsigned integer")); + $$ = SCM_INUM0; + } + } ; exclamations: