Update of /project/cxml/cvsroot/cxml/test In directory common-lisp.net:/tmp/cvs-serv26399/test

Modified Files: domtest.lisp Log Message: fehlermeldungen mitdribbeln

Date: Sun Dec 4 20:25:09 2005 Author: dlichteblau

Index: cxml/test/domtest.lisp diff -u cxml/test/domtest.lisp:1.6 cxml/test/domtest.lisp:1.7 --- cxml/test/domtest.lisp:1.6 Sun Dec 4 20:19:18 2005 +++ cxml/test/domtest.lisp Sun Dec 4 20:25:09 2005 @@ -678,7 +678,7 @@ (funcall (compile nil lisp))) (serious-condition (c) (incf nfailed) - (warn "test failed: ~A" c)))))) + (format t "~&TEST FAILED: ~A~&" c)))))) (incf i))))))) (let* ((d1 (merge-pathnames "tests/level1/core/" *directory*)) (d2 (merge-pathnames "tests/level2/core/" *directory*))