--- a/Cface__CStructuredNode.st	Tue Jul 12 15:02:15 2011 +0000
+++ b/Cface__CStructuredNode.st	Tue Jul 12 15:38:42 2011 +0000
@@ -24,6 +24,12 @@
     "Created: / 09-09-2008 / 16:49:58 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
+ffiTypeSymbol
+    "superclass Cface::CTypeNode says that I am responsible to implement this method"
+
+    ^ self shouldImplement
+!
+
 fields
     ^ fields
 
@@ -43,6 +49,23 @@
     "Created: / 09-09-2008 / 21:32:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
+!CStructuredNode methodsFor:'testing'!
+
+isCStructuredNode
+    ^ true
+! !
+
+!CStructuredNode 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 visitCStructuredNode:self
+! !
+
 !CStructuredNode class methodsFor:'documentation'!
 
 version