--- a/Cface__CDoubleNode.st	Fri Jan 08 10:30:02 2010 +0000
+++ b/Cface__CDoubleNode.st	Fri Jan 08 13:25:11 2010 +0000
@@ -10,76 +10,8 @@
 !
 
 
-!CDoubleNode methodsFor:'accessing'!
-
-cByteSize
-
-    "
-        Cface::CDoubleNode new cByteSize        
-    "
-
-    %{
-        return __MKSMALLINT(sizeof(double));
-    %}.
-    ^8
-
-    "Created: / 09-07-2008 / 19:33:02 / Jan Vrany <vranyj1@fel.cvut.cz>"
-!
-
-ffiTypeSymbol
-    "Superclass Cface::CTypeNode says that I am responsible to implement this method"
-    
-    ^ #double
-
-    "Created: / 03-07-2008 / 22:54:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
-!
-
-smalltalkName
-    "Superclass says that I am responsible to implement this method"
-
-    ^#Float
-
-    "Created: / 12-02-2008 / 22:06:24 / janfrog"
-!
-
-stxStructFieldGetterSelector
-    ^ #doubleAt:
-
-    "Created: / 09-09-2008 / 21:32:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
-! !
-
-!CDoubleNode methodsFor:'printing'!
-
-printOn: stream indent: indent
-
-    stream nextPutAll:'double'
-
-    "Created: / 04-03-2008 / 10:57:12 / janfrog"
-! !
-
-!CDoubleNode methodsFor:'testing'!
-
-isCDoubleNode
-    ^ true
-
-    "Created: / 17-02-2008 / 21:50:25 / janfrog"
-! !
-
-!CDoubleNode 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 visitCDoubleNode:self
-
-    "Created: / 12-02-2008 / 23:03:58 / janfrog"
-! !
-
 !CDoubleNode class methodsFor:'documentation'!
 
-version
-    ^ '$Header: /opt/data/cvs/cvut-fel/cface/Cface__CDoubleNode.st,v 1.1 2008/02/26 15:59:47 vranyj1 Exp $'
+version_SVN
+    ^ '$Id$'
 ! !