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

-eduni/namespaces/1.0/014.xml [not validating:] FAILED:

Browse Source 
-  invalid array index 0 for #() (should be nonnegative and <0)
-[
-Bad QName syntax: colon at end
-]
This commit is contained in:
dlichteblau
2005-12-03 21:26:53 +00:00
parent 141fe3524b
commit 59fec24c15
2 changed files with 5 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
XMLCONF
View File

@ -1798,21 +1798,13 @@ eduni/namespaces/1.0/010.xml [not validating:] not-wf [validating:] not-wf
eduni/namespaces/1.0/011.xml [not validating:] not-wf [validating:] not-wf
eduni/namespaces/1.0/012.xml [not validating:] not-wf [validating:] not-wf
eduni/namespaces/1.0/013.xml [not validating:] not-wf [validating:] invalid
eduni/namespaces/1.0/014.xml [not validating:] FAILED:
invalid array index 0 for #() (should be nonnegative and <0)
[
Bad QName syntax: colon at end
]
eduni/namespaces/1.0/014.xml [not validating:] not-wf [validating:] invalid
eduni/namespaces/1.0/015.xml [not validating:] FAILED:
well-formedness violation not detected
[
Bad QName syntax: colon at start
]
eduni/namespaces/1.0/016.xml [not validating:] FAILED:
invalid array index 0 for #() (should be nonnegative and <0)
[
Bad QName syntax: xmlns:
]
eduni/namespaces/1.0/016.xml [not validating:] not-wf [validating:] invalid
eduni/namespaces/1.0/017.xml [not validating:] input [validating:] invalid
eduni/namespaces/1.0/018.xml [not validating:] input [validating:] invalid
eduni/namespaces/1.0/019.xml [not validating:] input [validating:] invalid
@ -1859,4 +1851,4 @@ eduni/namespaces/1.0/046.xml [not validating:] input [validating:] FAILED:
[
Colon in ID attribute name
]
7/1829 tests failed; 333 tests were skipped
5/1829 tests failed; 333 tests were skipped

3
xml/xml-parse.lisp
View File

@ -3316,7 +3316,8 @@
;; have to check is that the first rune is a name-start-rune and that
;; there is not colon in it.
(defun nc-name-p (name)
(and (name-start-rune-p (rune name 0))
(and (plusp (length name))
(name-start-rune-p (rune name 0))
(notany #'(lambda (rune) (rune= #/: rune)) name)))
(defun split-qname (qname)