dom murmel dom
This commit is contained in:
22
DOMTEST
22
DOMTEST
@ -570,20 +570,10 @@ implementationAttribute signed not supported, skipping test
|
||||
540/808 createDocument06.xml
|
||||
541/808 createDocument07.xml
|
||||
542/808 createDocument08.xml
|
||||
TEST FAILED: There is no applicable method for the generic function
|
||||
#<STANDARD-GENERIC-FUNCTION DOM:IMPLEMENTATION (1)>
|
||||
when called with arguments
|
||||
(NIL).
|
||||
543/808 createDocumentType01.xml
|
||||
TEST FAILED: expected exception NAMESPACE_ERR
|
||||
544/808 createDocumentType02.xml
|
||||
TEST FAILED: expected exception INVALID_CHARACTER_ERR
|
||||
545/808 createDocumentType03.xml
|
||||
546/808 createDocumentType04.xml
|
||||
TEST FAILED: There is no applicable method for the generic function
|
||||
#<STANDARD-GENERIC-FUNCTION DOM:IMPLEMENTATION (1)>
|
||||
when called with arguments
|
||||
(NIL).
|
||||
547/808 createElementNS01.xml
|
||||
548/808 createElementNS02.xml
|
||||
549/808 createElementNS03.xml
|
||||
@ -637,10 +627,11 @@ TEST FAILED: There is no applicable method for the generic function
|
||||
580/808 documentimportnode12.xml
|
||||
581/808 documentimportnode13.xml
|
||||
582/808 documentimportnode14.xml
|
||||
TEST FAILED: There is no applicable method for the generic function
|
||||
#<STANDARD-GENERIC-FUNCTION DOM:IMPLEMENTATION (1)>
|
||||
when called with arguments
|
||||
(NIL).
|
||||
TEST FAILED: The assertion (DOMTEST::EQUALSP DOMTEST-TESTS::|attrValue|
|
||||
#(104 116 116 112 58 47 47 119 119
|
||||
119 46 110 105 115 116 46 103
|
||||
111 118)
|
||||
'DOMTEST::%EQUAL) failed.
|
||||
583/808 documentimportnode15.xml
|
||||
584/808 documentimportnode17.xml
|
||||
585/808 documentimportnode18.xml
|
||||
@ -661,7 +652,6 @@ implementationAttribute expandEntityReferences not supported, skipping test
|
||||
597/808 domimplementationcreatedocumenttype01.xml
|
||||
598/808 domimplementationcreatedocumenttype02.xml
|
||||
599/808 domimplementationcreatedocumenttype04.xml
|
||||
TEST FAILED: expected exception INVALID_CHARACTER_ERR
|
||||
600/808 domimplementationfeaturecore.xml
|
||||
TEST FAILED: The assertion DOMTEST-TESTS::|state| failed.
|
||||
601/808 domimplementationfeaturexmlversion2.xml
|
||||
@ -930,4 +920,4 @@ TEST FAILED: expected exception INUSE_ATTRIBUTE_ERR
|
||||
803/808 setNamedItemNS04.xml
|
||||
804/808 setNamedItemNS05.xml
|
||||
805/808 systemId01.xml
|
||||
43/763 tests failed; 45 tests were skipped
|
||||
38/763 tests failed; 45 tests were skipped
|
||||
@ -219,6 +219,7 @@
|
||||
|
||||
(defmethod dom:create-document-type
|
||||
((factory (eql 'implementation)) name publicid systemid)
|
||||
(safe-split-qname name #"")
|
||||
(make-instance 'dom-impl::document-type
|
||||
:name name
|
||||
:notations (make-instance 'dom-impl::named-node-map
|
||||
|
||||
@ -336,6 +336,7 @@
|
||||
("fail" (translate-fail element))
|
||||
("hasFeature" (translate-has-feature element))
|
||||
("if" (translate-if element))
|
||||
("implementation" (translate-implementation element))
|
||||
("increment" (translate-unary-assignment '+ element))
|
||||
("decrement" (translate-unary-assignment '- element))
|
||||
("length" (translate-length element))
|
||||
@ -366,6 +367,10 @@
|
||||
(maybe-setf (%intern |var|)
|
||||
`(load-file ,|href| ,(parse-java-literal |willBeModified|)))))
|
||||
|
||||
(defun translate-implementation (elt)
|
||||
(with-attributes (|var|) elt
|
||||
(maybe-setf (%intern |var|) `'dom-impl::implementation)))
|
||||
|
||||
(defun translate-length (load)
|
||||
;; XXX Soweit ich sehe unterscheiden die Tests nicht zwischen
|
||||
;; der Laenge von DOMString und der length()-Methode der uebrigen
|
||||
|
||||
Reference in New Issue
Block a user