Update of /project/cl-xmpp/cvsroot/cl-xmpp/test In directory common-lisp.net:/tmp/cvs-serv29110/test

Modified Files: cl-xmpp-test.asd result-test.lisp Added Files: cl-xmpp-test.lisp Log Message: more tests and updated README slightly

Date: Sun Nov 13 03:55:47 2005 Author: eenge

Index: cl-xmpp/test/cl-xmpp-test.asd diff -u cl-xmpp/test/cl-xmpp-test.asd:1.1 cl-xmpp/test/cl-xmpp-test.asd:1.2 --- cl-xmpp/test/cl-xmpp-test.asd:1.1 Sun Nov 13 03:36:11 2005 +++ cl-xmpp/test/cl-xmpp-test.asd Sun Nov 13 03:55:47 2005 @@ -1,5 +1,5 @@ ;;;; -*- mode: lisp -*- -;;;; $Id: cl-xmpp-test.asd,v 1.1 2005/11/13 02:36:11 eenge Exp $ +;;;; $Id: cl-xmpp-test.asd,v 1.2 2005/11/13 02:55:47 eenge Exp $ ;;;; $Source: /project/cl-xmpp/cvsroot/cl-xmpp/test/cl-xmpp-test.asd,v $

;;;; See the LICENSE file for licensing information. @@ -21,5 +21,7 @@ (:file "utility-test" :depends-on ("package")) (:file "result-test" + :depends-on ("package")))) + (:file "cl-xmpp-test" :depends-on ("package"))))

Index: cl-xmpp/test/result-test.lisp diff -u cl-xmpp/test/result-test.lisp:1.2 cl-xmpp/test/result-test.lisp:1.3 --- cl-xmpp/test/result-test.lisp:1.2 Sun Nov 13 03:45:41 2005 +++ cl-xmpp/test/result-test.lisp Sun Nov 13 03:55:47 2005 @@ -1,4 +1,4 @@ -;;;; $Id: result-test.lisp,v 1.2 2005/11/13 02:45:41 eenge Exp $ +;;;; $Id: result-test.lisp,v 1.3 2005/11/13 02:55:47 eenge Exp $ ;;;; $Source: /project/cl-xmpp/cvsroot/cl-xmpp/test/result-test.lisp,v $

;;;; See the LICENSE file for licensing information. @@ -14,4 +14,4 @@

(deftest get-element.1 (xmpp:get-element *empty-element* :x) nil) (deftest get-element.2 (xmpp:get-element *element+subelement* :x) nil) -(deftest get-element.3 (xmpp:get-element *element+subelement* :subtest) #.*sub-element*) +(deftest get-element.3 (xmpp:name (xmpp:get-element *element+subelement* :subtest)) :subtest)