diff -r e873065959dc -r ffcbe7184a53 Cface__CStructuredNode.st --- 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 " ! +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 " ! ! +!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