December 2005 - cxml-cvs@common-lisp.net - mailman3.common-lisp.net

[cxml-cvs] CVS update: cxml/doc/cxml.css
by dlichteblau＠common-lisp.net 30 Dec '05

30 Dec '05

Update of /project/cxml/cvsroot/cxml/doc In directory common-lisp.net:/tmp/cvs-serv16892/doc Modified Files: cxml.css Log Message: sidebar css Date: Fri Dec 30 21:47:32 2005 Author: dlichteblau Index: cxml/doc/cxml.css diff -u cxml/doc/cxml.css:1.3 cxml/doc/cxml.css:1.4 --- cxml/doc/cxml.css:1.3 Fri Dec 30 17:06:33 2005 +++ cxml/doc/cxml.css Fri Dec 30 21:47:32 2005 @@ -1,7 +1,11 @@ div.sidebar { float: right; background-color: #eeeeee; - border: 2pt solid black; + border: solid #9c0000; + border-top-width: 0px; + border-bottom-width: 0px; + border-left-width: 4px; + border-right-width: 0px; margin: 0em 2pt 1em 2em; min-width: 15%; padding: 0pt 5pt 5pt 5pt;

1 0

[cxml-cvs] CVS update: cxml/doc/dom.html cxml/doc/installation.html cxml/doc/quickstart.html cxml/doc/using.html cxml/doc/xmls-compat.html
by dlichteblau＠common-lisp.net 30 Dec '05

30 Dec '05

Update of /project/cxml/cvsroot/cxml/doc In directory common-lisp.net:/tmp/cvs-serv27117/doc Modified Files: dom.html installation.html quickstart.html using.html xmls-compat.html Log Message: link korrigiert Date: Fri Dec 30 17:08:25 2005 Author: dlichteblau Index: cxml/doc/dom.html diff -u cxml/doc/dom.html:1.6 cxml/doc/dom.html:1.7 --- cxml/doc/dom.html:1.6 Thu Dec 29 01:31:31 2005 +++ cxml/doc/dom.html Fri Dec 30 17:08:25 2005 @@ -40,7 +40,7 @@ </ul> </li> <li> - <a href="using.html">DOM implementation</a> + <a href="dom.html">DOM implementation</a> <ul class="sub"> <li><a href="dom.html#parser">Parsing with the DOM builder</a></li> <li><a href="dom.html#serialization">Serialization</a></li> Index: cxml/doc/installation.html diff -u cxml/doc/installation.html:1.8 cxml/doc/installation.html:1.9 --- cxml/doc/installation.html:1.8 Thu Dec 29 01:31:31 2005 +++ cxml/doc/installation.html Fri Dec 30 17:08:25 2005 @@ -40,7 +40,7 @@ </ul> </li> <li> - <a href="using.html">DOM implementation</a> + <a href="dom.html">DOM implementation</a> <ul class="sub"> <li><a href="dom.html#parser">Parsing with the DOM builder</a></li> <li><a href="dom.html#serialization">Serialization</a></li> Index: cxml/doc/quickstart.html diff -u cxml/doc/quickstart.html:1.5 cxml/doc/quickstart.html:1.6 --- cxml/doc/quickstart.html:1.5 Thu Dec 29 01:31:31 2005 +++ cxml/doc/quickstart.html Fri Dec 30 17:08:25 2005 @@ -40,7 +40,7 @@ </ul> </li> <li> - <a href="using.html">DOM implementation</a> + <a href="dom.html">DOM implementation</a> <ul class="sub"> <li><a href="dom.html#parser">Parsing with the DOM builder</a></li> <li><a href="dom.html#serialization">Serialization</a></li> Index: cxml/doc/using.html diff -u cxml/doc/using.html:1.12 cxml/doc/using.html:1.13 --- cxml/doc/using.html:1.12 Thu Dec 29 01:31:31 2005 +++ cxml/doc/using.html Fri Dec 30 17:08:25 2005 @@ -40,7 +40,7 @@ </ul> </li> <li> - <a href="using.html">DOM implementation</a> + <a href="dom.html">DOM implementation</a> <ul class="sub"> <li><a href="dom.html#parser">Parsing with the DOM builder</a></li> <li><a href="dom.html#serialization">Serialization</a></li> Index: cxml/doc/xmls-compat.html diff -u cxml/doc/xmls-compat.html:1.3 cxml/doc/xmls-compat.html:1.4 --- cxml/doc/xmls-compat.html:1.3 Thu Dec 29 01:31:31 2005 +++ cxml/doc/xmls-compat.html Fri Dec 30 17:08:25 2005 @@ -40,7 +40,7 @@ </ul> </li> <li> - <a href="using.html">DOM implementation</a> + <a href="dom.html">DOM implementation</a> <ul class="sub"> <li><a href="dom.html#parser">Parsing with the DOM builder</a></li> <li><a href="dom.html#serialization">Serialization</a></li>

1 0

[cxml-cvs] CVS update: cxml/README.html
by dlichteblau＠common-lisp.net 30 Dec '05

30 Dec '05

Update of /project/cxml/cvsroot/cxml In directory common-lisp.net:/tmp/cvs-serv27117 Modified Files: README.html Log Message: link korrigiert Date: Fri Dec 30 17:08:24 2005 Author: dlichteblau Index: cxml/README.html diff -u cxml/README.html:1.17 cxml/README.html:1.18 --- cxml/README.html:1.17 Fri Dec 30 15:21:43 2005 +++ cxml/README.html Fri Dec 30 17:08:24 2005 @@ -40,7 +40,7 @@ </ul> </li> <li> - <a href="doc/using.html">DOM implementation</a> + <a href="doc/dom.html">DOM implementation</a> <ul class="sub"> <li><a href="doc/dom.html#parser">Parsing with the DOM builder</a></li> <li><a href="doc/dom.html#serialization">Serialization</a></li>

1 0

[cxml-cvs] CVS update: cxml/doc/bg.png cxml/doc/cxml.css
by dlichteblau＠common-lisp.net 30 Dec '05

30 Dec '05

Update of /project/cxml/cvsroot/cxml/doc In directory common-lisp.net:/tmp/cvs-serv27089/doc Modified Files: cxml.css Added Files: bg.png Log Message: hintergrundleiste Date: Fri Dec 30 17:06:34 2005 Author: dlichteblau Index: cxml/doc/cxml.css diff -u cxml/doc/cxml.css:1.2 cxml/doc/cxml.css:1.3 --- cxml/doc/cxml.css:1.2 Mon Dec 26 23:04:10 2005 +++ cxml/doc/cxml.css Fri Dec 30 17:06:33 2005 @@ -30,8 +30,13 @@ background-color: #ffffff; margin-right: 0pt; margin-bottom: 10%; + margin-left: 40px; padding-left: 30px; font-family: helvetica; + background-image: url(bg.png); + background-position: top left; + background-attachment: fixed; + background-repeat: no-repeat; } h1,h2,h3 {

1 0

[cxml-cvs] CVS update: cxml/runes/package.lisp cxml/runes/xstream.lisp
by dlichteblau＠common-lisp.net 30 Dec '05

30 Dec '05

Update of /project/cxml/cvsroot/cxml/runes In directory common-lisp.net:/tmp/cvs-serv19785/runes Modified Files: package.lisp xstream.lisp Log Message: kleine anpassungen fuer cl-xmpp neu: do-node-map, map-node-map Date: Fri Dec 30 15:21:47 2005 Author: dlichteblau Index: cxml/runes/package.lisp diff -u cxml/runes/package.lisp:1.5 cxml/runes/package.lisp:1.6 --- cxml/runes/package.lisp:1.5 Thu Dec 29 00:11:32 2005 +++ cxml/runes/package.lisp Fri Dec 30 15:21:46 2005 @@ -43,6 +43,7 @@ #:rod< ;; xstream.lisp + #:xstream #:make-xstream #:make-rod-xstream #:close-xstream Index: cxml/runes/xstream.lisp diff -u cxml/runes/xstream.lisp:1.4 cxml/runes/xstream.lisp:1.5 --- cxml/runes/xstream.lisp:1.4 Mon Nov 28 23:33:35 2005 +++ cxml/runes/xstream.lisp Fri Dec 30 15:21:47 2005 @@ -256,9 +256,7 @@ ;;; Underflow -;;(defun read-runes (sequence input)) - -(defun xstream-underflow (input) +(defmethod xstream-underflow ((input xstream)) (declare (type xstream input)) ;; we are about to fill new data into the buffer, so we need to ;; adjust buffer-start.

1 0

[cxml-cvs] CVS update: cxml/dom/dom-impl.lisp cxml/dom/package.lisp
by dlichteblau＠common-lisp.net 30 Dec '05

30 Dec '05

Update of /project/cxml/cvsroot/cxml/dom In directory common-lisp.net:/tmp/cvs-serv19785/dom Modified Files: dom-impl.lisp package.lisp Log Message: kleine anpassungen fuer cl-xmpp neu: do-node-map, map-node-map Date: Fri Dec 30 15:21:46 2005 Author: dlichteblau Index: cxml/dom/dom-impl.lisp diff -u cxml/dom/dom-impl.lisp:1.35 cxml/dom/dom-impl.lisp:1.36 --- cxml/dom/dom-impl.lisp:1.35 Thu Dec 29 00:11:22 2005 +++ cxml/dom/dom-impl.lisp Fri Dec 30 15:21:44 2005 @@ -188,6 +188,15 @@ (dom:map-node-list (lambda (,var) ,@body) ,nodelist) ,resultform)) +(defun dom:map-node-map (fn node-map) + (with-slots (items) node-map + (mapc fn items))) + +(defmacro dom:do-node-map ((var node-map &optional resultform) &body body) + `(block nil + (dom:map-node-map (lambda (,var) ,@body) ,node-map) + ,resultform)) + (defmacro dovector ((var vector &optional resultform) &body body) `(loop for ,var across ,vector do (progn ,@body) Index: cxml/dom/package.lisp diff -u cxml/dom/package.lisp:1.4 cxml/dom/package.lisp:1.5 --- cxml/dom/package.lisp:1.4 Tue Dec 27 01:21:31 2005 +++ cxml/dom/package.lisp Fri Dec 30 15:21:46 2005 @@ -138,5 +138,7 @@ #:map-node-list #:do-node-list + #:map-node-map + #:do-node-map #:create-document #:map-document))

1 0

[cxml-cvs] CVS update: cxml/README.html
by dlichteblau＠common-lisp.net 30 Dec '05

30 Dec '05

Update of /project/cxml/cvsroot/cxml In directory common-lisp.net:/tmp/cvs-serv19785 Modified Files: README.html Log Message: kleine anpassungen fuer cl-xmpp neu: do-node-map, map-node-map Date: Fri Dec 30 15:21:44 2005 Author: dlichteblau Index: cxml/README.html diff -u cxml/README.html:1.16 cxml/README.html:1.17 --- cxml/README.html:1.16 Thu Dec 29 01:31:30 2005 +++ cxml/README.html Fri Dec 30 15:21:43 2005 @@ -82,7 +82,7 @@ </ul> <p> - CXML currently implements a <a + CXML implements a <a href="http://www.w3.org/TR/REC-xml-names/">namespace-aware</a>, validating SAX-like <a href="http://www.w3.org/TR/2000/REC-xml-20001006">XML 1.0</a>

1 0

[cxml-cvs] CVS update: cxml/xml/space-normalizer.lisp
by dlichteblau＠common-lisp.net 29 Dec '05

29 Dec '05

Update of /project/cxml/cvsroot/cxml/xml In directory common-lisp.net:/tmp/cvs-serv7711/xml Modified Files: space-normalizer.lisp Log Message: oops Date: Thu Dec 29 01:39:25 2005 Author: dlichteblau Index: cxml/xml/space-normalizer.lisp diff -u cxml/xml/space-normalizer.lisp:1.1 cxml/xml/space-normalizer.lisp:1.2 --- cxml/xml/space-normalizer.lisp:1.1 Thu Dec 29 01:31:36 2005 +++ cxml/xml/space-normalizer.lisp Thu Dec 29 01:39:25 2005 @@ -29,9 +29,9 @@ (let ((xml-space (sax:find-attribute (if (stringp qname) "xml:space" #"xml:space") attrs))) - (push (print(if xml-space + (push (if xml-space (rod= (rod (sax:attribute-value xml-space)) #"default") - (car (xml-space-attributes handler)))) + (car (xml-space-attributes handler))) (xml-space-attributes handler))) (let* ((e (cxml::find-element (rod qname) dtd)) (cspec (when e (cxml::elmdef-content e))))

1 0

[cxml-cvs] CVS update: cxml/runes/ystream.lisp
by dlichteblau＠common-lisp.net 29 Dec '05

29 Dec '05

Update of /project/cxml/cvsroot/cxml/runes In directory common-lisp.net:/tmp/cvs-serv7660/runes Modified Files: ystream.lisp Log Message: sb-unicode backport Date: Thu Dec 29 01:38:00 2005 Author: dlichteblau Index: cxml/runes/ystream.lisp diff -u cxml/runes/ystream.lisp:1.2 cxml/runes/ystream.lisp:1.3 --- cxml/runes/ystream.lisp:1.2 Thu Dec 29 01:31:34 2005 +++ cxml/runes/ystream.lisp Thu Dec 29 01:37:59 2005 @@ -76,7 +76,7 @@ (when (plusp ptr) (let* ((in (ystream-in-buffer ystream)) (out (ystream-out-buffer ystream)) - (surrogatep (<= #xD800 (elt in (1- ptr)) #xDBFF)) + (surrogatep (<= #xD800 (rune-code (elt in (1- ptr))) #xDBFF)) n) (when surrogatep (decf ptr)) @@ -179,11 +179,11 @@ (:conc-name "YSTREAM-")) (target-stream nil)) - (defmethod flush-ystream ((ystream rod-ystream)) + (defmethod flush-ystream ((ystream character-stream-ystream)) (write-string (ystream-in-buffer ystream) (ystream-target-stream ystream)) (setf (ystream-in-ptr ystream) 0)) - (defmethod close-ystream ((ystream rod-ystream)) + (defmethod close-ystream ((ystream character-stream-ystream)) (ystream-target-stream ystream)))

1 0

[cxml-cvs] CVS update: cxml/xml/unparse.lisp
by dlichteblau＠common-lisp.net 29 Dec '05

29 Dec '05

Update of /project/cxml/cvsroot/cxml/xml In directory common-lisp.net:/tmp/cvs-serv7660/xml Modified Files: unparse.lisp Log Message: sb-unicode backport Date: Thu Dec 29 01:38:01 2005 Author: dlichteblau Index: cxml/xml/unparse.lisp diff -u cxml/xml/unparse.lisp:1.6 cxml/xml/unparse.lisp:1.7 --- cxml/xml/unparse.lisp:1.6 Thu Dec 29 00:11:48 2005 +++ cxml/xml/unparse.lisp Thu Dec 29 01:38:00 2005 @@ -108,7 +108,7 @@ (define-maker make-rod-sink make-rod-ystream) #+rune-is-character - (define-maker make-character-stream-sink make-character-ystream stream) + (define-maker make-character-stream-sink make-character-stream-ystream stream) #-rune-is-character (define-maker make-string-sink/utf8 make-string-ystream/utf8)

1 0