--- a/Cface__CStructuredNode.st	Tue Sep 09 15:15:50 2008 +0000
+++ b/Cface__CStructuredNode.st	Tue Sep 09 21:17:04 2008 +0000
@@ -3,7 +3,7 @@
 "{ NameSpace: Cface }"
 
 CDerivedTypeNode subclass:#CStructuredNode
-	instanceVariableNames:'fields'
+	instanceVariableNames:'cByteSize fields'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Cface-C AST'
@@ -11,6 +11,18 @@
 
 !CStructuredNode methodsFor:'accessing'!
 
+cByteSize
+    ^ cByteSize
+
+    "Created: / 09-09-2008 / 16:49:58 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+cByteSize:anInteger
+    cByteSize := anInteger.
+
+    "Created: / 09-09-2008 / 16:49:58 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
 fields
     ^ fields
 
@@ -24,10 +36,9 @@
     "Created: / 10-07-2008 / 08:43:26 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
-smalltalkxValueExtractionSelector
+stxStructFieldGetterSelector
+    ^ #at:
 
-    ^#at:
-
-    "Created: / 10-07-2008 / 08:43:58 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Created: / 09-09-2008 / 21:32:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !