Index: vhTest/Fake/Tools/Mock/Helper.cls.xml
===================================================================
diff -u
--- vhTest/Fake/Tools/Mock/Helper.cls.xml	(revision 0)
+++ vhTest/Fake/Tools/Mock/Helper.cls.xml	(revision 2407)
@@ -0,0 +1,57 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.Tools.Mock.Helper">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="AantalKeerOpgeroepenArray">
+<Type>%Integer</Type>
+<Collection>array</Collection>
+<Private>1</Private>
+</Property>
+
+<Method name="GeefAantalKeerOpgeroepen">
+<FormalSpec>MethodeNaam:%String</FormalSpec>
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[
+	#dim AantalKeerOpgeroepen As %Integer = 0
+	If ..BestaatMethode(MethodeNaam) {
+		Set AantalKeerOpgeroepen = ..AantalKeerOpgeroepenArray.GetAt(MethodeNaam)
+	}
+	Quit AantalKeerOpgeroepen
+]]></Implementation>
+</Method>
+
+<Method name="IncrementeerAantalKeerOpgeroepen">
+<FormalSpec>MethodeNaam:%String</FormalSpec>
+<Implementation><![CDATA[
+	If '..BestaatMethode(MethodeNaam) {
+		Do ..AantalKeerOpgeroepenArray.SetAt(1, MethodeNaam)
+	} Else {
+		#dim Aantal As %Integer = ..GeefAantalKeerOpgeroepen(MethodeNaam)+1
+		Do ..AantalKeerOpgeroepenArray.SetAt(Aantal,MethodeNaam)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="BestaatMethode">
+<FormalSpec>MethodeNaam:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..AantalKeerOpgeroepenArray.IsDefined(MethodeNaam)
+]]></Implementation>
+</Method>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..AantalKeerOpgeroepenArray = ##class(%ArrayOfDataTypes).%New()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/Tools/Mock/TestDoubleCreator/UpdateTestDouble/FakeCreator.cls.xml
===================================================================
diff -u -r1545 -r2407
--- vhUnitTest/Tools/Mock/TestDoubleCreator/UpdateTestDouble/FakeCreator.cls.xml	(.../FakeCreator.cls.xml)	(revision 1545)
+++ vhUnitTest/Tools/Mock/TestDoubleCreator/UpdateTestDouble/FakeCreator.cls.xml	(.../FakeCreator.cls.xml)	(revision 2407)
@@ -4,7 +4,7 @@
 <Super>Tools.Mock.TestDoubleCreator</Super>
 
 <Property name="FakeHelper">
-<Type>vhTest.Fake.Helper</Type>
+<Type>vhTest.Fake.Tools.Mock.Helper</Type>
 </Property>
 
 <Property name="GetTestDoubleClassNameParameterClassName">
@@ -166,6 +166,7 @@
 
 <Method name="SaveGeneratedClass">
 <Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="HasToClearMethods">
@@ -183,7 +184,7 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Do ##super(svnHelper)
-	Set ..FakeHelper = ##class(vhTest.Fake.Helper).%New()
+	Set ..FakeHelper = ##class(vhTest.Fake.Tools.Mock.Helper).%New()
 	quit $$$OK
 ]]></Implementation>
 </Method>