Cface__CTypeNode.st
changeset 9 03c7a764d2be
parent 5 c110eef5b9ef
child 11 a77f44d45a27
--- 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'!