Index: TECH/CompiledClassUtils.cls.xml
===================================================================
diff -u -r1550 -r1856
--- TECH/CompiledClassUtils.cls.xml	(.../CompiledClassUtils.cls.xml)	(revision 1550)
+++ TECH/CompiledClassUtils.cls.xml	(.../CompiledClassUtils.cls.xml)	(revision 1856)
@@ -12,6 +12,14 @@
 	quit CompiledTimeStamp
 ]]></Implementation>
 </Method>
+
+<Method name="Exists">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>ClassName:TECH.String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ##class(%Dictionary.CompiledClass).%ExistsId(ClassName)
+]]></Implementation>
+</Method>
 </Class>