3
fooBar = \notes { << c''4 \\ g'4 >> }
5
#(ly:set-option 'parse-protect #f)
6
#(load-from-path "to-xml.scm")
8
#(music-to-xml fooBar (current-output-port))
11
texidoc = "@cindex To XML"
12
texidoc = #(string-append
13
"The input representation is very generic. Therefore, it
14
should not be hard to convert it to XML or a similar format:\n\n"
17
(call-with-output-string
18
(lambda (p) (music-to-xml fooBar p))