--- a/Cface__CTypeNode.st Tue Sep 09 15:15:50 2008 +0000
+++ b/Cface__CTypeNode.st Tue Sep 09 21:17:04 2008 +0000
@@ -34,19 +34,16 @@
"Created: / 09-07-2008 / 20:41:19 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
-smalltalkxValueExtractionSelector
+stxStructFieldGetterSelector
+ ^ #at:
- ^#at:
-
- "Created: / 09-07-2008 / 21:39:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Created: / 09-09-2008 / 21:32:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
-smalltalkxValueSettingSelector
+stxStructFieldSetterSelector
+ ^ (self stxStructFieldGetterSelector , 'put:') asSymbol
- ^(self smalltalkxValueExtractionSelector , 'put:') asSymbol
-
- "Created: / 09-07-2008 / 22:13:29 / Jan Vrany <vranyj1@fel.cvut.cz>"
- "Modified: / 10-07-2008 / 07:38:35 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Created: / 09-09-2008 / 21:33:21 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !
!CTypeNode methodsFor:'converting'!