input/regression/to-xml.ly

   1 \version "2.16.0"
   2
   3 testMusic =  { << c''4 \\ g'4 >> }
   4
   5 #(use-modules (scm to-xml))
   6
   7 #(ly:progress "\nXML:\n\n~A\n" (call-with-output-string (lambda (p) (music-to-xml testMusic p))))
   8
   9
  10 \header {
  11   texidoc =
  12   "The input representation is generic, and may be translated to XML. "
  13 }
  14
  15
  16 { \testMusic }