compiler/TAutomaticType.st
changeset 15 10a95d798b36
child 16 17a2d1d9f205
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/compiler/TAutomaticType.st	Wed Sep 23 22:21:44 2015 +0100
@@ -0,0 +1,41 @@
+"{ Package: 'jv:tea/compiler' }"
+
+"{ NameSpace: Smalltalk }"
+
+TType subclass:#TAutomaticType
+	instanceVariableNames:''
+	classVariableNames:''
+	poolDictionaries:''
+	category:'Languages-Tea-Compiler-Types'
+!
+
+!TAutomaticType methodsFor:'comparing'!
+
+= anotherType
+    ^ anotherType class == self class
+
+    "Created: / 23-09-2015 / 16:26:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+hash
+    ^ self class hash
+
+    "Created: / 23-09-2015 / 16:26:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!TAutomaticType methodsFor:'printing & storing'!
+
+printWithoutAnglesOn:aStream
+    aStream nextPutAll: '#auto'
+
+    "Created: / 23-09-2015 / 16:27:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!TAutomaticType methodsFor:'testing'!
+
+isAutomaticType
+    ^ true
+
+    "Created: / 23-09-2015 / 16:32:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+