--- a/compiler/extensions.st	Wed Sep 02 18:15:44 2015 +0100
+++ b/compiler/extensions.st	Mon Sep 14 11:19:10 2015 +0100
@@ -167,6 +167,15 @@
     "Created: / 29-08-2015 / 21:47:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!RGDefinition methodsFor:'testing types'!
+
+isCompilationUnit
+
+    ^false
+
+    "Created: / 14-09-2015 / 10:29:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !RGMetaclassDefinition methodsFor:'visiting'!
 
 acceptVisitor: anObject