cxml-devel

Download

cxml-devel@lists.common-lisp.net

December 2012

1 participants
2 discussions

[cxml-devel] Incorrect character with code 12 in output?
by Camille Troillard 05 Dec '12

05 Dec '12

Hello, I have a database with text data which sometimes is not proper to valid XML. For example, there is a field sometimes containing the character new-page or ^L in emacs (ASCII code = 12). While CXML does not complain and outputs cmxl:text as it was given, another XML parser complains that this is not valid XML. PCDATA invalid Char value 12 I am expecting CXML to produce valid output, is there something I missed to make it more strict? I am using LispWorks 64 bits. Thanks! Best Regards, Cam

1 0

[cxml-devel] Possible bug in rune-dom::adjust-vector-exponentially
by Camille Troillard 05 Dec '12

05 Dec '12

Hi, I have a process that is stuck in the following function: ;; from dom-impl.lisp (defun adjust-vector-exponentially (vector new-dimension set-fill-pointer-p) (let ((d (array-dimension vector 0))) (when (< d new-dimension) (loop do (setf d (* 2 d)) while (< d new-dimension)) (adjust-array vector d)) (when set-fill-pointer-p (setf (fill-pointer vector) new-dimension)))) Apparently, adjust-vector-exponentially assumes d > 0, but this function has been called from (METHOD SAX:CHARACTERS (RUNE-DOM::DOM-BUILDER T)) with an empty string (d = 0). The loop obviously shows it will never exit the function. Adding the following before the loop statement fixes the problem: (when (= d 0) (incf d)) Best Regards, Camille

1 0