Index: vhUnitTest/TECH/Integer/TestValueList.cls.xml
===================================================================
diff -u -r957 -r1777
--- vhUnitTest/TECH/Integer/TestValueList.cls.xml	(.../TestValueList.cls.xml)	(revision 957)
+++ vhUnitTest/TECH/Integer/TestValueList.cls.xml	(.../TestValueList.cls.xml)	(revision 1777)
@@ -8,6 +8,14 @@
 <Private>1</Private>
 </Property>
 
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	set ..Mock = ##class(vhUnitTest.TECH.Integer.MockClass).%New()
+	do ##super(aTestName)
+]]></Implementation>
+</Method>
+
 <Method name="TestOnevenWaarde">
 <Implementation><![CDATA[
 	set ..Mock.IntegerEvenValueList = 1
@@ -28,21 +36,6 @@
 	do $$$AssertTrue(..Mock.%ValidateObject())
 ]]></Implementation>
 </Method>
-
-<Method name="TestGeenInteger">
-<Implementation><![CDATA[
-	set ..Mock.IntegerEvenValueList = 1.5
-	do $$$AssertFalse(..Mock.%ValidateObject())
-]]></Implementation>
-</Method>
-
-<Method name="OnBeforeOneTest">
-<FormalSpec>aTestName:%String</FormalSpec>
-<Implementation><![CDATA[
-	set ..Mock = ##class(vhUnitTest.TECH.Integer.MockClass).%New()
-	do ##super(aTestName)
-]]></Implementation>
-</Method>
 </Class>