Index: new_tests/Makefile
==================================================================
--- new_tests/Makefile
+++ new_tests/Makefile
@@ -52,10 +52,11 @@
        OFSetTests.m				\
        OFStringTests.m				\
        OFSystemInfoTests.m			\
        OFUTF8StringTests.m			\
        OFXMLElementBuilderTests.m		\
+       OFXMLNodeTests.m				\
        OFXMLParserTests.m			\
        ${RUNTIME_ARC_TESTS_M}			\
        RuntimeTests.m				\
        ${USE_SRCS_PLUGINS}			\
        ${USE_SRCS_SOCKETS}			\

ADDED   new_tests/OFXMLNodeTests.m
Index: new_tests/OFXMLNodeTests.m
==================================================================
--- new_tests/OFXMLNodeTests.m
+++ new_tests/OFXMLNodeTests.m
@@ -0,0 +1,206 @@
+/*
+ * Copyright (c) 2008-2024 Jonathan Schleifer <js@nil.im>
+ *
+ * All rights reserved.
+ *
+ * This file is part of ObjFW. It may be distributed under the terms of the
+ * Q Public License 1.0, which can be found in the file LICENSE.QPL included in
+ * the packaging of this file.
+ *
+ * Alternatively, it may be distributed under the terms of the GNU General
+ * Public License, either version 2 or 3, which can be found in the file
+ * LICENSE.GPLv2 or LICENSE.GPLv3 respectively included in the packaging of this
+ * file.
+ */
+
+#include "config.h"
+
+#import "ObjFW.h"
+#import "ObjFWTest.h"
+
+@interface OFXMLNodeTests: OTTestCase
+@end
+
+@implementation OFXMLNodeTests
+- (void)testElementWithName
+{
+	OTAssertEqualObjects(
+	    [[OFXMLElement elementWithName: @"foo"] XMLString],
+	    @"<foo/>");
+}
+
+- (void)testElementWithNameStringValue
+{
+	OTAssertEqualObjects(
+	    [[OFXMLElement elementWithName: @"foo"
+			       stringValue: @"b&ar"] XMLString],
+	    @"<foo>b&amp;ar</foo>");
+}
+
+- (void)testElementWithNameNamespace
+{
+	OFXMLElement *element;
+
+	element = [OFXMLElement elementWithName: @"foo"
+				      namespace: @"urn:objfw:test"];
+	[element addAttributeWithName: @"test" stringValue: @"test"];
+	[element setPrefix: @"objfw-test" forNamespace: @"urn:objfw:test"];
+	OTAssertEqualObjects(element.XMLString,
+	    @"<objfw-test:foo test='test'/>");
+
+	element = [OFXMLElement elementWithName: @"foo"
+				      namespace: @"urn:objfw:test"];
+	[element addAttributeWithName: @"test" stringValue: @"test"];
+	OTAssertEqualObjects(element.XMLString,
+	    @"<foo xmlns='urn:objfw:test' test='test'/>");
+}
+
+- (void)testElementWithNameNamespaceStringValue
+{
+	OFXMLElement *element = [OFXMLElement elementWithName: @"foo"
+						    namespace: @"urn:objfw:test"
+						  stringValue: @"x"];
+	[element setPrefix: @"objfw-test" forNamespace: @"urn:objfw:test"];
+	OTAssertEqualObjects(element.XMLString,
+	    @"<objfw-test:foo>x</objfw-test:foo>");
+}
+
+- (void)testElementWithXMLStringAndStringValue
+{
+	OTAssertEqualObjects([[OFXMLElement elementWithXMLString:
+	    @"<?xml version='1.0' encoding='UTF-8'?>\r\n<x>foo<![CDATA[bar]]>"
+	    @"<y>b<!-- fooo -->az</y>qux</x>"] stringValue],
+	    @"foobarbazqux");
+}
+
+- (void)testCharactersWithString
+{
+	OTAssertEqualObjects(
+	    [[OFXMLCharacters charactersWithString: @"<foo>"] XMLString],
+	    @"&lt;foo&gt;");
+}
+
+- (void)testCDATAWithString
+{
+	OTAssertEqualObjects(
+	    [[OFXMLCDATA CDATAWithString: @"<foo>"] XMLString],
+	    @"<![CDATA[<foo>]]>");
+}
+
+- (void)testCommentWithText
+{
+	OTAssertEqualObjects(
+	    [[OFXMLComment commentWithText: @" comment "] XMLString],
+	    @"<!-- comment -->");
+}
+
+- (void)testIsEqual
+{
+	OTAssertEqualObjects(
+	    [OFXMLElement elementWithXMLString: @"<foo bar='asd'/>"],
+	    [OFXMLElement elementWithXMLString: @"<foo bar='asd'></foo>"]);
+
+	OTAssertEqualObjects(
+	    [OFXMLElement elementWithXMLString: @"<x><y/></x>"],
+	    [OFXMLElement elementWithXMLString: @"<x><y></y></x>"]);
+
+	OTAssertNotEqualObjects(
+	    [OFXMLElement elementWithXMLString: @"<x><Y/></x>"],
+	    [OFXMLElement elementWithXMLString: @"<x><y></y></x>"]);
+}
+
+- (void)testHash
+{
+	OTAssertEqual(
+	    [[OFXMLElement elementWithXMLString: @"<foo bar='asd'/>"] hash],
+	    [[OFXMLElement elementWithXMLString: @"<foo bar='asd'></foo>"]
+	    hash]);
+
+	OTAssertEqual(
+	    [[OFXMLElement elementWithXMLString: @"<x><y/></x>"] hash],
+	    [[OFXMLElement elementWithXMLString: @"<x><y></y></x>"] hash]);
+
+	OTAssertNotEqual(
+	    [[OFXMLElement elementWithXMLString: @"<x><Y/></x>"] hash],
+	    [[OFXMLElement elementWithXMLString: @"<x><y></y></x>"] hash]);
+}
+
+- (void)testAddAttributeWithNameStringValue
+{
+	OFXMLElement *element = [OFXMLElement elementWithName: @"foo"
+						  stringValue: @"b&ar"];
+
+	[element setPrefix: @"objfw-test" forNamespace: @"urn:objfw:test"];
+	[element addAttributeWithName: @"foo"
+			  stringValue: @"b&ar"];
+	[element addAttributeWithName: @"foo"
+			    namespace: @"urn:objfw:test"
+			  stringValue: @"bar"];
+
+	OTAssertEqualObjects(element.XMLString,
+	    @"<foo foo='b&amp;ar' objfw-test:foo='bar'>b&amp;ar</foo>");
+}
+
+- (void)testRemoveAttributeForNameNamespace
+{
+	OFXMLElement *element = [OFXMLElement elementWithName: @"foo"
+						  stringValue: @"b&ar"];
+
+	[element setPrefix: @"objfw-test" forNamespace: @"urn:objfw:test"];
+	[element addAttributeWithName: @"foo"
+			  stringValue: @"b&ar"];
+	[element addAttributeWithName: @"foo"
+			    namespace: @"urn:objfw:test"
+			  stringValue: @"bar"];
+
+	[element removeAttributeForName: @"foo"];
+	OTAssertEqualObjects(element.XMLString,
+	    @"<foo objfw-test:foo='bar'>b&amp;ar</foo>");
+
+	[element removeAttributeForName: @"foo" namespace: @"urn:objfw:test"];
+	OTAssertEqualObjects(element.XMLString, @"<foo>b&amp;ar</foo>");
+}
+
+- (void)testAddChild
+{
+	OFXMLElement *element;
+
+	element = [OFXMLElement elementWithName: @"foo"];
+	[element addAttributeWithName: @"foo" stringValue: @"b&ar"];
+	[element addChild: [OFXMLElement elementWithName: @"bar"]];
+	OTAssertEqualObjects(element.XMLString,
+	    @"<foo foo='b&amp;ar'><bar/></foo>");
+
+	element = [OFXMLElement elementWithName: @"foo"
+				      namespace: @"urn:objfw:test"];
+	[element setPrefix: @"objfw-test" forNamespace: @"urn:objfw:test"];
+	[element addAttributeWithName: @"test" stringValue: @"test"];
+	[element addChild: [OFXMLElement elementWithName: @"bar"
+					       namespace: @"urn:objfw:test"]];
+	OTAssertEqualObjects(element.XMLString,
+	    @"<objfw-test:foo test='test'><objfw-test:bar/></objfw-test:foo>");
+}
+
+- (void)testElementsForNameNamespace
+{
+	OFXMLElement *element = [OFXMLElement elementWithName: @"foo"];
+	OFXMLElement *bar;
+
+	[element addChild: [OFXMLElement elementWithName: @"foo"]];
+	bar = [OFXMLElement elementWithName: @"bar"
+				  namespace: @"urn:objfw:test"];
+	[element addChild: bar];
+
+	OTAssertEqualObjects([element elementsForName: @"bar"
+					    namespace: @"urn:objfw:test"],
+	    [OFArray arrayWithObject: bar]);
+}
+
+- (void)testXMLStringWithIndentation
+{
+	OTAssertEqualObjects([[OFXMLElement
+	    elementWithXMLString: @"<x><y><z>a\nb</z><!-- foo --></y></x>"]
+	    XMLStringWithIndentation: 2],
+	    @"<x>\n  <y>\n    <z>a\nb</z>\n    <!-- foo -->\n  </y>\n</x>");
+}
+@end

Index: tests/Makefile
==================================================================
--- tests/Makefile
+++ tests/Makefile
@@ -13,11 +13,10 @@
 
 PROG_NOINST = tests${PROG_SUFFIX}
 STATIC_LIB_NOINST = ${TESTS_STATIC_LIB}
 SRCS = OFStreamTests.m			\
        OFValueTests.m			\
-       OFXMLNodeTests.m			\
        TestsAppDelegate.m
 
 IOS_USER ?= mobile
 IOS_TMP ?= /tmp/objfw-test
 

DELETED tests/OFXMLNodeTests.m
Index: tests/OFXMLNodeTests.m
==================================================================
--- tests/OFXMLNodeTests.m
+++ tests/OFXMLNodeTests.m
@@ -1,137 +0,0 @@
-/*
- * Copyright (c) 2008-2024 Jonathan Schleifer <js@nil.im>
- *
- * All rights reserved.
- *
- * This file is part of ObjFW. It may be distributed under the terms of the
- * Q Public License 1.0, which can be found in the file LICENSE.QPL included in
- * the packaging of this file.
- *
- * Alternatively, it may be distributed under the terms of the GNU General
- * Public License, either version 2 or 3, which can be found in the file
- * LICENSE.GPLv2 or LICENSE.GPLv3 respectively included in the packaging of this
- * file.
- */
-
-#include "config.h"
-
-#import "TestsAppDelegate.h"
-
-static OFString *module;
-
-@implementation TestsAppDelegate (OFXMLNodeTests)
-- (void)XMLNodeTests
-{
-	void *pool = objc_autoreleasePoolPush();
-	id node1, node2, node3, node4;
-	OFArray *array;
-
-	module = @"OFXMLNode";
-
-	TEST(@"+[elementWithName:]",
-	    (node1 = [OFXMLElement elementWithName: @"foo"]) &&
-	    [[node1 XMLString] isEqual: @"<foo/>"])
-
-	TEST(@"+[elementWithName:stringValue:]",
-	    (node2 = [OFXMLElement elementWithName: @"foo"
-				       stringValue: @"b&ar"]) &&
-	    [[node2 XMLString] isEqual: @"<foo>b&amp;ar</foo>"])
-
-	TEST(@"+[elementWithName:namespace:]",
-	    (node3 = [OFXMLElement elementWithName: @"foo"
-					 namespace: @"urn:objfw:test"]) &&
-	    R([node3 addAttributeWithName: @"test" stringValue: @"test"]) &&
-	    R([node3 setPrefix: @"objfw-test"
-		  forNamespace: @"urn:objfw:test"]) &&
-	    [[node3 XMLString] isEqual: @"<objfw-test:foo test='test'/>"] &&
-	    (node4 = [OFXMLElement elementWithName: @"foo"
-					 namespace: @"urn:objfw:test"]) &&
-	    R([node4 addAttributeWithName: @"test" stringValue: @"test"]) &&
-	    [[node4 XMLString] isEqual:
-	    @"<foo xmlns='urn:objfw:test' test='test'/>"])
-
-	TEST(@"+[elementWithName:namespace:stringValue:]",
-	    (node4 = [OFXMLElement elementWithName: @"foo"
-					 namespace: @"urn:objfw:test"
-				       stringValue: @"x"]) &&
-	    R([node4 setPrefix: @"objfw-test"
-		  forNamespace: @"urn:objfw:test"]) &&
-	    [[node4 XMLString] isEqual: @"<objfw-test:foo>x</objfw-test:foo>"])
-
-	TEST(@"+[charactersWithString:]",
-	    (node4 = [OFXMLCharacters charactersWithString: @"<foo>"]) &&
-	    [[node4 XMLString] isEqual: @"&lt;foo&gt;"])
-
-	TEST(@"+[CDATAWithString:]",
-	    (node4 = [OFXMLCDATA CDATAWithString: @"<foo>"]) &&
-	    [[node4 XMLString] isEqual: @"<![CDATA[<foo>]]>"]);
-
-	TEST(@"+[commentWithText:]",
-	    (node4 = [OFXMLComment commentWithText: @" comment "]) &&
-	    [[node4 XMLString] isEqual: @"<!-- comment -->"])
-
-	module = @"OFXMLElement";
-
-	TEST(@"-[addAttributeWithName:stringValue:]",
-	    R([node1 addAttributeWithName: @"foo" stringValue: @"b&ar"]) &&
-	    [[node1 XMLString] isEqual: @"<foo foo='b&amp;ar'/>"] &&
-	    R([node2 addAttributeWithName: @"foo" stringValue: @"b&ar"]) &&
-	    [[node2 XMLString] isEqual: @"<foo foo='b&amp;ar'>b&amp;ar</foo>"])
-
-	TEST(@"-[setPrefix:forNamespace:]",
-	    R([node2 setPrefix: @"objfw-test"
-		  forNamespace: @"urn:objfw:test"]))
-
-	TEST(@"-[addAttributeWithName:namespace:stringValue:]",
-	    R([node2 addAttributeWithName: @"foo"
-				namespace: @"urn:objfw:test"
-			      stringValue: @"bar"]) &&
-	    R([node2 addAttributeWithName: @"foo"
-				namespace: @"urn:objfw:test"
-			      stringValue: @"ignored"]) &&
-	    [[node2 XMLString] isEqual:
-	    @"<foo foo='b&amp;ar' objfw-test:foo='bar'>b&amp;ar</foo>"])
-
-	TEST(@"-[removeAttributeForName:namespace:]",
-	    R([node2 removeAttributeForName: @"foo"]) &&
-	    [[node2 XMLString] isEqual:
-	    @"<foo objfw-test:foo='bar'>b&amp;ar</foo>"] &&
-	    R([node2 removeAttributeForName: @"foo"
-				  namespace: @"urn:objfw:test"]) &&
-	    [[node2 XMLString] isEqual: @"<foo>b&amp;ar</foo>"])
-
-	TEST(@"-[addChild:]",
-	    R([node1 addChild: [OFXMLElement elementWithName: @"bar"]]) &&
-	    [[node1 XMLString] isEqual:
-	    @"<foo foo='b&amp;ar'><bar/></foo>"] &&
-	    R([node3 addChild: [OFXMLElement elementWithName: @"bar"
-		    namespace: @"urn:objfw:test"]]) &&
-	    [[node3 XMLString] isEqual:
-	    @"<objfw-test:foo test='test'><objfw-test:bar/></objfw-test:foo>"])
-
-	TEST(@"+[elementWithXMLString:] and -[stringValue]",
-	    [[[OFXMLElement elementWithXMLString:
-	    @"<?xml version='1.0' encoding='UTF-8'?>\r\n<x>foo<![CDATA[bar]]>"
-	    @"<y>b<!-- fooo -->az</y>qux</x>"] stringValue]
-	    isEqual: @"foobarbazqux"])
-
-	TEST(@"-[elementsForName:namespace:]",
-	    (array = [node3 elementsForName: @"bar"
-				  namespace: @"urn:objfw:test"]) &&
-	    array.count == 1 && [[array.firstObject XMLString] isEqual:
-	    @"<bar xmlns='urn:objfw:test'/>"])
-
-	TEST(@"-[isEqual:]",
-	    [[OFXMLElement elementWithXMLString: @"<foo bar='asd'/>"] isEqual:
-	    [OFXMLElement elementWithXMLString: @"<foo bar='asd'></foo>"]] &&
-	    [[OFXMLElement elementWithXMLString: @"<x><y/></x>"] isEqual:
-	    [OFXMLElement elementWithXMLString: @"<x><y></y></x>"]])
-
-	TEST(@"-[XMLStringWithIndentation:]",
-	    [[[OFXMLElement elementWithXMLString: @"<x><y><z>a\nb</z>"
-	    @"<!-- foo --></y></x>"] XMLStringWithIndentation: 2] isEqual:
-	    @"<x>\n  <y>\n    <z>a\nb</z>\n    <!-- foo -->\n  </y>\n</x>"])
-
-	objc_autoreleasePoolPop(pool);
-}
-@end

Index: tests/TestsAppDelegate.h
==================================================================
--- tests/TestsAppDelegate.h
+++ tests/TestsAppDelegate.h
@@ -64,9 +64,5 @@
 @end
 
 @interface TestsAppDelegate (OFValueTests)
 - (void)valueTests;
 @end
-
-@interface TestsAppDelegate (OFXMLNodeTests)
-- (void)XMLNodeTests;
-@end

Index: tests/TestsAppDelegate.m
==================================================================
--- tests/TestsAppDelegate.m
+++ tests/TestsAppDelegate.m
@@ -370,11 +370,10 @@
 	    changeCurrentDirectoryPath: @"/apps/objfw-tests"];
 #endif
 
 	[self valueTests];
 	[self streamTests];
-	[self XMLNodeTests];
 
 	[OFStdOut reset];
 
 #if defined(OF_IOS)
 	[OFStdOut writeFormat: @"%d tests failed!", _fails];