--- a/compiler/TSimpleType.st	Tue Sep 22 17:43:38 2015 +0100
+++ b/compiler/TSimpleType.st	Wed Sep 23 22:21:44 2015 +0100
@@ -70,14 +70,6 @@
 
 !TSimpleType methodsFor:'printing & storing'!
 
-printOn:aStream
-    aStream nextPut: $<; space.
-    self printWithoutAnglesOn:aStream.
-    aStream space; nextPut: $>.
-
-    "Created: / 25-08-2015 / 23:22:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
 printWithoutAnglesOn:aStream
     aStream nextPutAll: name