OSCL/CXML
2
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

-ibm/not-wf/P10/ibm10n01.xml [not-wf?] FAILED:

Browse Source 
-  well-formedness violation not detected
-[
-    Tests an attribute with an invalid value. The value of the attribute "first
"
-    contains the character "less than".
-  ]
-ibm/not-wf/P10/ibm10n05.xml [not-wf?] FAILED:
-  well-formedness violation not detected
-[
-    Tests an attribute with an invalid value. The value of the attribute "first
"
-    contains the character "less than".
-  ]
This commit is contained in:
dlichteblau
2005-11-27 00:33:54 +00:00
parent f5ce3f7b17
commit 36175ea81d
2 changed files with 6 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
XMLCONF
View File

@ -974,21 +974,11 @@ ibm/not-wf/P09/ibm09n01.xml [not-wf?] not-wf
ibm/not-wf/P09/ibm09n02.xml [not-wf?] not-wf ibm/not-wf/P09/ibm09n02.xml [not-wf?] not-wf
ibm/not-wf/P09/ibm09n03.xml [not-wf?] not-wf ibm/not-wf/P09/ibm09n03.xml [not-wf?] not-wf
ibm/not-wf/P09/ibm09n04.xml [not-wf?] not-wf ibm/not-wf/P09/ibm09n04.xml [not-wf?] not-wf
ibm/not-wf/P10/ibm10n01.xml [not-wf?] FAILED: ibm/not-wf/P10/ibm10n01.xml [not-wf?] not-wf
well-formedness violation not detected
[
Tests an attribute with an invalid value. The value of the attribute "first"
contains the character "less than".
]
ibm/not-wf/P10/ibm10n02.xml [not-wf?] not-wf ibm/not-wf/P10/ibm10n02.xml [not-wf?] not-wf
ibm/not-wf/P10/ibm10n03.xml [not-wf?] not-wf ibm/not-wf/P10/ibm10n03.xml [not-wf?] not-wf
ibm/not-wf/P10/ibm10n04.xml [not-wf?] not-wf ibm/not-wf/P10/ibm10n04.xml [not-wf?] not-wf
ibm/not-wf/P10/ibm10n05.xml [not-wf?] FAILED: ibm/not-wf/P10/ibm10n05.xml [not-wf?] not-wf
well-formedness violation not detected
[
Tests an attribute with an invalid value. The value of the attribute "first"
contains the character "less than".
]
ibm/not-wf/P10/ibm10n06.xml [not-wf?] not-wf ibm/not-wf/P10/ibm10n06.xml [not-wf?] not-wf
ibm/not-wf/P10/ibm10n07.xml [not-wf?] not-wf ibm/not-wf/P10/ibm10n07.xml [not-wf?] not-wf
ibm/not-wf/P10/ibm10n08.xml [not-wf?] not-wf ibm/not-wf/P10/ibm10n08.xml [not-wf?] not-wf
@ -1833,4 +1823,4 @@ ibm/valid/P86/ibm86v01.xml [not validating:] input [validating:] input
ibm/valid/P87/ibm87v01.xml [not validating:] input [validating:] input ibm/valid/P87/ibm87v01.xml [not validating:] input [validating:] input
ibm/valid/P88/ibm88v01.xml [not validating:] input [validating:] input ibm/valid/P88/ibm88v01.xml [not validating:] input [validating:] input
ibm/valid/P89/ibm89v01.xml [not validating:] input [validating:] input ibm/valid/P89/ibm89v01.xml [not validating:] input [validating:] input
9/1786 tests failed; 376 tests were skipped 7/1786 tests failed; 376 tests were skipped

6
xml/xml-parse.lisp
View File

@ -1368,9 +1368,7 @@
(rune= c #/U+000A) (rune= c #/U+000A)
(rune= c #/U+000D)))) (rune= c #/U+000D))))
(consume-rune input)) (consume-rune input))
(cons name (read-att-value-2 input)) (cons name (read-att-value-2 input))))
;;(cons name (read-att-value zinput input :ATT t))
))
(defun canon-not-cdata-attval (value) (defun canon-not-cdata-attval (value)
;; | If the declared value is not CDATA, then the XML processor must ;; | If the declared value is not CDATA, then the XML processor must
@ -3283,6 +3281,8 @@
(error "EOF")) (error "EOF"))
((rune= c delim) ((rune= c delim)
(return)) (return))
((rune= c #/<)
(wf-error "'<' not allowed in attribute values"))
((rune= #/& c) ((rune= #/& c)
(multiple-value-bind (kind sem) (read-entity-ref input) (multiple-value-bind (kind sem) (read-entity-ref input)
(ecase kind (ecase kind