Update of /project/cxml/cvsroot/cxml/dom In directory clnet:/tmp/cvs-serv8803/dom

Modified Files: dom-builder.lisp Log Message: SAX overhaul for HAX integration.

* dom/dom-builder.lisp (DOM-BUILDER): Inherit from sax:content-handler.

* klacks/klacks-impl.lisp (KLACKS-DTD-HANDLER): Inherit from sax:default-handler.

* klacks/klacks.lisp (KLACKS:SERIALIZE-EVENT): Bugfix -- call start-cdata and end-cdata on the handler, not the source.

* xml/package.lisp: New export WITH-OUTPUT-SINK.

* xml/sax-handler.lisp (SAX): New exports abstract-handler, content-handler, default-handler. (STANDARD-ATTRIBUTE): Renamed from attribute. (ATTRIBUTE-NAMESPACE-URI, ATTRIBUTE-LOCAL-NAME, ATTRIBUTE-QNAME, ATTRIBUTE-VALUE, ATTRIBUTE-SPECIFIED-P): Wrapper methods for standard-attribute. Wrapper methods for hax:standard-attribute. (all events): pulled into a common define-event form. New dummy method on null. Added a warning to the default method. New error method on abstract-handler. New dummy method on the respective default handler classes.

* xml/sax-proxy.lisp (BROADCAST-HANDLER): Inherit from abstract-handler, not sax-parser-mixin.

* xml/unparse.lisp (sink): Inherit from sax:content-handler. (WITH-OUTPUT-SINK): New macro. (INVOKE-WITH-OUTPUT-SINK): New function.

--- /project/cxml/cvsroot/cxml/dom/dom-builder.lisp 2007/10/03 15:17:08 1.14 +++ /project/cxml/cvsroot/cxml/dom/dom-builder.lisp 2007/10/14 17:50:11 1.15 @@ -15,7 +15,7 @@ (in-package :utf8-dom)

-(defclass dom-builder () +(defclass dom-builder (sax:content-handler) ((document :initform nil :accessor document) (element-stack :initform '() :accessor element-stack) (internal-subset :accessor internal-subset)