-\version "2.10.0"
+\version "2.16.0"
testMusic = { << c''4 \\ g'4 >> }
-#(load-from-path "to-xml.scm")
+#(use-modules (scm to-xml))
+
+#(ly:progress "\nXML:\n\n~A\n" (call-with-output-string (lambda (p) (music-to-xml testMusic p))))
-#(ly:progress "\nXML:\n\n~A\n"
- (call-with-output-string
- (lambda (p) (music-to-xml testMusic p))))
\header {
texidoc =
}
-\testMusic
-
+{ \testMusic }