--- a/Cface__CStructFieldNode.st Fri Jul 04 12:05:15 2008 +0000
+++ b/Cface__CStructFieldNode.st Thu Jul 10 07:31:14 2008 +0000
@@ -3,7 +3,7 @@
"{ NameSpace: Cface }"
CDefinitionNode subclass:#CStructFieldNode
- instanceVariableNames:'type'
+ instanceVariableNames:'type offset owner'
classVariableNames:''
poolDictionaries:''
category:'Cface-C AST'
@@ -39,6 +39,44 @@
!CStructFieldNode methodsFor:'accessing'!
+offset
+ ^ offset
+
+ "Created: / 09-07-2008 / 21:15:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+offset:something
+ offset := something.
+
+ "Created: / 09-07-2008 / 21:15:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+owner
+ ^ owner
+
+ "Created: / 09-07-2008 / 21:28:36 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+owner:something
+ owner := something.
+
+ "Created: / 09-07-2008 / 21:28:36 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+smalltalkxValueExtractionSelector
+
+ ^type smalltalkxValueExtractionSelector
+
+ "Created: / 09-07-2008 / 21:39:21 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+smalltalkxValueSettingSelector
+
+ ^type smalltalkxValueSettingSelector
+
+ "Created: / 09-07-2008 / 22:21:09 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
type
^ type