--- a/compiler/TSimpleType.st	Mon Aug 31 18:37:31 2015 +0100
+++ b/compiler/TSimpleType.st	Wed Sep 02 09:18:00 2015 +0100
@@ -58,12 +58,13 @@
     name = 'iptr' ifTrue:[ 
         ^ LLVMType intptr
     ].
-    name = 'SmallInteger' ifTrue:[ 
+    name = 'tSmallInteger' ifTrue:[ 
         ^ LLVMType intptr
     ].                  
     self notYetImplemented
 
     "Created: / 31-08-2015 / 09:06:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 01-09-2015 / 21:53:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !TSimpleType methodsFor:'initialization'!