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

(import-node attribute)

Browse Source
This commit is contained in:
dlichteblau
2005-12-04 21:44:06 +00:00
parent a8cfbee393
commit 0ef0e0be0f
2 changed files with 6 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
DOMTEST
View File

@ -555,7 +555,6 @@ implementationAttribute signed not supported, skipping test
525/808 attrgetownerelement02.xml 525/808 attrgetownerelement02.xml
526/808 attrgetownerelement03.xml 526/808 attrgetownerelement03.xml
527/808 attrgetownerelement04.xml 527/808 attrgetownerelement04.xml
TEST FAILED: The slot DOM-IMPL::OWNER-ELEMENT is unbound in the object #<DOM-IMPL::ATTRIBUTE emp:zone="CANADA" {xxxxxxxx}>.
528/808 attrgetownerelement05.xml 528/808 attrgetownerelement05.xml
TEST FAILED: The assertion (DOMTEST::EQUALSP DOMTEST-TESTS::|ownerElementName| TEST FAILED: The assertion (DOMTEST::EQUALSP DOMTEST-TESTS::|ownerElementName|
#(97 100 100 114 101 115 115) #(97 100 100 114 101 115 115)
@ -960,4 +959,4 @@ TEST FAILED: expected exception INUSE_ATTRIBUTE_ERR
803/808 setNamedItemNS04.xml 803/808 setNamedItemNS04.xml
804/808 setNamedItemNS05.xml 804/808 setNamedItemNS05.xml
805/808 systemId01.xml 805/808 systemId01.xml
63/763 tests failed; 45 tests were skipped 62/763 tests failed; 45 tests were skipped

6
dom/dom-impl.lisp
View File

@ -1238,7 +1238,11 @@
(defmethod dom:import-node ((document document) (node attribute) deep) (defmethod dom:import-node ((document document) (node attribute) deep)
(declare (ignore deep)) (declare (ignore deep))
(import-node-internal 'attribute document node t :name (dom:name node))) (import-node-internal 'attribute
document node
t
:name (dom:name node)
:owner-element nil))
(defmethod dom:import-node ((document document) (node document-fragment) deep) (defmethod dom:import-node ((document document) (node document-fragment) deep)
(import-node-internal 'document-fragment document node deep)) (import-node-internal 'document-fragment document node deep))