[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Lilypond inside scheme
From: |
Nicolas Sceaux |
Subject: |
Re: Lilypond inside scheme |
Date: |
Fri, 09 Sep 2005 19:18:36 +0200 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (darwin) |
Joe Neeman <address@hidden> writes:
> In lilypond 2.6.3, I copied the example from the manual page on "Using
> Lilypond syntax inside scheme":
>
> #(define mynotes #{ \override Stem #'thickness = #4
> { c'8 d' } #})
>
> But it gives me the error
> Parsing...
> <string>:1:22: error: syntax error, unexpected STRING
> {
> c'8 d' } }
>
> Is the example incorrect or have I done something wrong?
For a reason I don't get, you have to explicitly add \notemode :
#(define mynotes #{ \override Stem #'thickness = #4
\notemode { c'8 d' } #})
Maybe we should add the \notemode directly in the #{ #} definition.
Index: scm/ly-from-scheme.scm
===================================================================
RCS file: /cvsroot/lilypond/lilypond/scm/ly-from-scheme.scm,v
retrieving revision 1.10
diff -u -r1.10 ly-from-scheme.scm
--- scm/ly-from-scheme.scm 11 Jul 2005 12:59:30 -0000 1.10
+++ scm/ly-from-scheme.scm 9 Sep 2005 17:16:11 -0000
@@ -18,12 +18,10 @@
(define-public (ly:parse-string-result str parser)
"Parse `str', which is supposed to contain a music expression."
- (let ((music-sym (gen-lily-sym)))
- (ly:parser-parse-string
- parser
- (format #f "parseStringResult = { ~a }" str))
-
- (ly:parser-lookup parser 'parseStringResult)))
+ (ly:parser-parse-string
+ parser
+ (format #f "parseStringResult = \\notemode { ~a }" str))
+ (ly:parser-lookup parser 'parseStringResult))
(define-public (read-lily-expression chr port)
"Read a #{ lily music expression #} from port and return