Cface__CIntNode.st
changeset 14 1f730d82496e
parent 9 03c7a764d2be
child 16 ffcbe7184a53
--- a/Cface__CIntNode.st	Fri Jan 08 10:30:02 2010 +0000
+++ b/Cface__CIntNode.st	Fri Jan 08 13:25:11 2010 +0000
@@ -10,77 +10,8 @@
 !
 
 
-!CIntNode methodsFor:'accessing'!
-
-cByteSize
-
-    "
-        Cface::CIntNode new cByteSize         
-    "
-
-    %{
-        return __MKSMALLINT(sizeof(int));
-    %}.
-    ^4
-
-    "Created: / 09-07-2008 / 19:34:10 / Jan Vrany <vranyj1@fel.cvut.cz>"
-!
-
-ffiTypeSymbol
-    "Superclass Cface::CTypeNode says that I am responsible to implement this method"
-    
-    ^ #int32
-
-    "Created: / 03-07-2008 / 22:54:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
-    "Modified: / 10-07-2008 / 07:55:48 / Jan Vrany <vranyj1@fel.cvut.cz>"
-!
-
-smalltalkName
-    "Superclass says that I am responsible to implement this method"
-
-    ^#SmallInteger
-
-    "Created: / 12-02-2008 / 22:06:24 / janfrog"
-!
-
-stxStructFieldGetterSelector
-    ^ #doubleWordAt:
-
-    "Created: / 09-09-2008 / 21:32:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
-! !
-
-!CIntNode methodsFor:'printing'!
-
-printOn: stream indent: indent
-
-    stream nextPutAll:'int'
-
-    "Created: / 04-03-2008 / 10:57:12 / janfrog"
-! !
-
-!CIntNode methodsFor:'testing'!
-
-isCIntNode
-    ^ true
-
-    "Created: / 17-02-2008 / 21:50:25 / janfrog"
-! !
-
-!CIntNode methodsFor:'visiting'!
-
-acceptVisitor:aVisitor 
-    "Double dispatch back to the visitor, passing my type encoded in
-     the selector (visitor pattern)"
-
-    "stub code automatically generated - please change if required"
-
-    ^ aVisitor visitCIntNode:self
-
-    "Created: / 12-02-2008 / 23:03:58 / janfrog"
-! !
-
 !CIntNode class methodsFor:'documentation'!
 
-version
-    ^ '$Header: /opt/data/cvs/cvut-fel/cface/Cface__CIntNode.st,v 1.1 2008/02/26 16:00:08 vranyj1 Exp $'
+version_SVN
+    ^ '$Id$'
 ! !