Easy Classes

Text nodes are the chit-chat in <p>chit-chat</p>.
CL-USER> (stp:make-text "chit-chat")
#.(STP:TEXT :DATA "chit-chat")
<!--Ich bin ein Blindtext.--> is preserved by the parser as a node, too.
CL-USER> (stp:make-comment "Ich bin ein Blindtext.")
#.(STP:COMMENT :DATA "Ich bin ein Blindtext.")
<?xml-stylesheet type='text/xsl' href='style.xsl'?>
CL-USER> (stp:make-processing-instruction "xml-stylesheet" "type='text/xsl' href='style.xsl'")
#.(STP:PROCESSING-INSTRUCTION
   :DATA "type='text/xsl' href='style.xsl'"
   :TARGET "xml-stylesheet")