--- a/compiler/TCompiler.st	Mon Sep 14 11:19:10 2015 +0100
+++ b/compiler/TCompiler.st	Mon Sep 14 15:03:03 2015 +0100
@@ -52,16 +52,16 @@
     | unit |
 
     unit := context unit.
-    self assert:(unit isRingObject and:[ unit isCompilationUnit ] ).
-    unit classes do: [ :class | context environment addClass: class ].
-
+    self assert:(unit isRingObject and:[ unit isCompilationUnit ]).
+    unit classes do:[:class | 
+        context environment addClass:class
+    ].
     self runPass:TSemanticAnalyser.
-    self runPass:TTypeseeder.
     self runPass:TTypechecker.
-    self runPass:TCodeGenerator.
+    self runPass:TLLVMCodeGenerator.
 
     "Created: / 29-08-2015 / 14:22:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 14-09-2015 / 10:33:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 14-09-2015 / 13:10:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 runPass: aClass