--- a/Cface__CTypeNode.st	Fri Jul 04 12:05:15 2008 +0000
+++ b/Cface__CTypeNode.st	Thu Jul 10 07:31:14 2008 +0000
@@ -12,10 +12,41 @@
 
 !CTypeNode methodsFor:'accessing'!
 
+cByteSize
+
+    ^self subclassResponsibility
+
+    "Created: / 09-07-2008 / 19:26:51 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
 ffiTypeSymbol
     ^ self subclassResponsibility
 
     "Created: / 03-07-2008 / 22:54:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+priority
+
+    ^self isForeign 
+        ifTrue:[super priority - 1]
+        ifFalse:[super priority]
+
+    "Created: / 09-07-2008 / 20:41:19 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+smalltalkxValueExtractionSelector
+
+    ^#at:
+
+    "Created: / 09-07-2008 / 21:39:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+smalltalkxValueSettingSelector
+
+    ^(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>"
 ! !
 
 !CTypeNode methodsFor:'converting'!