dom murmel dom

This commit is contained in:
dlichteblau
2005-12-04 22:57:30 +00:00
parent 3dce1bffe5
commit 1b31540480
3 changed files with 12 additions and 16 deletions

22
DOMTEST
View File

@ -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

View File

@ -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

View File

@ -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