--- a/compiler/TCompiler.st	Wed Sep 02 09:18:00 2015 +0100
+++ b/compiler/TCompiler.st	Wed Sep 02 18:15:44 2015 +0100
@@ -36,11 +36,12 @@
     self 
         assert:(unit isRingObject and:[ unit isClass and:[ unit isMeta not ] ]).
     self runPass:TSemanticAnalyser.
+    self runPass:TTypeseeder.
     self runPass:TTypechecker.
     self runPass:TCodeGenerator.
 
     "Created: / 29-08-2015 / 14:22:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified (format): / 31-08-2015 / 10:51:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 03-09-2015 / 16:25:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 compile: unit