Index: vhUnitTest/TECH/Integer/General/NormalisationTest.cls.xml
===================================================================
diff -u -r1775 -r1784
--- vhUnitTest/TECH/Integer/General/NormalisationTest.cls.xml	(.../NormalisationTest.cls.xml)	(revision 1775)
+++ vhUnitTest/TECH/Integer/General/NormalisationTest.cls.xml	(.../NormalisationTest.cls.xml)	(revision 1784)
@@ -7,6 +7,11 @@
 <Type>TECH.Integer</Type>
 </Property>
 
+<Property name="Array">
+<Type>TECH.Integer</Type>
+<Collection>array</Collection>
+</Property>
+
 <Method name="Test: Set Property value --&gt; normalisation">
 <Implementation><![CDATA[
 	do ..AssertValue( 1.0 , 1 )
@@ -48,6 +53,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Array --&gt; no normalisation">
+<Implementation><![CDATA[
+	; Voorlopig geen normalisatie --> later wel eens uitzoeken omdat in orde te brengen.
+	do ..Array.SetAt(9.9,"Value")
+	do $$$AssertEquals(..Array.GetAt("Value"),9.9)
+]]></Implementation>
+</Method>
+
 <Method name="AssertValue">
 <FormalSpec>Value:TECH.Integer,ExpectedValue:%String</FormalSpec>
 <Private>1</Private>