Index: Tools/Mock/MethodCallStub.cls.xml
===================================================================
diff -u -r670 -r782
--- Tools/Mock/MethodCallStub.cls.xml	(.../MethodCallStub.cls.xml)	(revision 670)
+++ Tools/Mock/MethodCallStub.cls.xml	(.../MethodCallStub.cls.xml)	(revision 782)
@@ -56,7 +56,7 @@
 
 <Method name="DanException">
 <FormalSpec>Exception:TECH.Exceptions.BaseException</FormalSpec>
-<Implementation><![CDATA[	// TODO
+<Implementation><![CDATA[	do ##class(TECH.ExceptionHandler).Throw(Exception)
 ]]></Implementation>
 </Method>