So, und jetzt wollen wir auch noch die richtige Klasse von Fehler sehen.

"Von 0 auf 1005 in einem check-in."

-0/1786 tests failed; 376 tests were skipped
+1005/1786 tests failed; 376 tests were skipped

test/xmlconf.lisp

@@ -69,6 +69,7 @@
     (with-open-file (*standard-output*
 		     (merge-pathnames "XMLCONF" base)
 		     :direction :output
+		     :external-format :iso-8859-1
 		     :if-exists :supersede)
       (run-all-tests directory))))
 
@@ -173,11 +174,9 @@
       (progn
 	(format t " [not-wf?]")
 	(cxml:parse-file pathname (dom:make-dom-builder) :validate t)
-	nil)
+	(error "well-formedness violation not detected")
-    (:no-error (n1l)
+      nil)
-      (error "well-formedness violation not detected")
+    (cxml:well-formedness-violation ()
-      n1l)
-    (serious-condition ()
       (format t " not-wf")
       t)))
 

xml/package.lisp

@@ -50,9 +50,12 @@
    #:cdata
    #:text
 
+   #:xml-parse-error
+   #:well-formedness-violation
+   #:validity-error
+
    #:parse-dtd-file
    #:parse-dtd-stream
-   #:validity-error
    #:make-validator
 
    #:*cache-all-dtds*