--- a/Cface__CPointerNode.st Thu Jul 03 22:00:07 2008 +0000
+++ b/Cface__CPointerNode.st Fri Jul 04 08:35:55 2008 +0000
@@ -51,11 +51,15 @@
ffiTypeSymbol
"Superclass Cface::CTypeNode says that I am responsible to implement this method"
- ^(type isKindOf: CCharNode)
- ifTrue:[#charPointer]
- ifFalse:[#pointer]
+ (type isCCharNode)
+ ifTrue:[^#charPointer].
+ ((type isCStructNode) and:[type isAnonymous not])
+ ifTrue:[^type smalltalkClassNameWithNamespace].
+
+ ^#pointer
"Created: / 03-07-2008 / 22:54:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 04-07-2008 / 09:27:36 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
type