--- a/compiler/TCompilerContext.st	Mon Sep 14 11:19:10 2015 +0100
+++ b/compiler/TCompilerContext.st	Mon Sep 14 15:03:03 2015 +0100
@@ -36,3 +36,12 @@
     unit := aTCompilationUnit.
 ! !
 
+!TCompilerContext methodsFor:'error reporting'!
+
+reportTypeError: message
+
+    TCompilerError raiseErrorString: message
+
+    "Created: / 14-09-2015 / 14:20:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+