use-modules : sxml simple

; write xml to the output port
sxml->xml
   quote
     html
         head : title "test"
         body
             h1 "test"
             p "it " : em "works!"
               br
               " it actually works!"

newline