SERIALIZE examples

STP to DOM:
CL-USER> (stp:serialize document (cxml-dom:make-dom-builder))
#<RUNE-DOM::DOCUMENT {1005A421F1}>
STP to xmls-style lists:
CL-USER> (stp:serialize document (cxml-xmls:make-xmls-builder))
(("x" . "") NIL)
Relax NG validation:
CL-USER> (let ((schema (cxml-rng:parse-compact #p"/home/david/demo.rnc")))
	   (stp:serialize document (cxml-rng:make-validator schema)))
Error: element example () not valid,
was expecting an element named "demo", in the namespace ""
   [Condition of type CXML-RNG:RNG-ERROR]