-;;;; ly-from-scheme.scm -- parsing LilyPond music expressions from scheme
+;;;; parser-ly-from-scheme.scm -- parsing LilyPond music expressions from scheme
;;;;
;;;; source file of the GNU LilyPond music typesetter
;;;;
-;;;; (c) 2004--2006 Nicolas Sceaux <nicolas.sceaux@free.fr>
+;;;; (c) 2004--2009 Nicolas Sceaux <nicolas.sceaux@free.fr>
;;;; Jan Nieuwenhuizen <janneke@gnu.org>
(define gen-lily-sym
(char->integer #\0)))))
(string->list (number->string var-idx)))))))))
-(define-public (ly:parse-string-result str parser)
+(define-public (parse-string-result str parser)
"Parse `str', which is supposed to contain a music expression."
+
(ly:parser-parse-string
parser
(format #f "parseStringResult = \\notemode { ~a }" str))
;; other caracters
(else
(display c out))))))))
- `(let ((parser-clone (ly:clone-parser parser)))
+ `(let ((parser-clone (ly:parser-clone parser)))
,@(map (lambda (binding)
`(ly:parser-define! parser-clone ',(car binding) ,(cdr binding)))
(reverse bindings))
- (ly:parse-string-result ,lily-string parser-clone)))))
+ (parse-string-result ,lily-string parser-clone)))))
(read-hash-extend #\{ read-lily-expression)