[cxml-cvs] CVS cxml/klacks

Update of /project/cxml/cvsroot/cxml/klacks In directory clnet:/tmp/cvs-serv4185

Modified Files: klacks.lisp Log Message: Fixed klacks-error export, thanks to Andreas Fuchs.

--- /project/cxml/cvsroot/cxml/klacks/klacks.lisp 2007/10/14 17:50:11 1.10 +++ /project/cxml/cvsroot/cxml/klacks/klacks.lisp 2007/12/22 15:24:36 1.11 @@ -219,10 +219,10 @@ (return (values this a b c)))) (klacks:consume source))))

-(define-condition klacks-error (xml-parse-error) ()) +(define-condition klacks:klacks-error (xml-parse-error) ())

(defun klacks-error (fmt &rest args) - (%error 'klacks-error + (%error 'klacks:klacks-error nil (format nil "Klacks assertion failed: ~?" fmt args)))