Hi Paolo
I have made a patch for CType comparaison.
Commit: 92b24ab42101800bbd86
You can fetch it from:
git://github.com/mathk/smalltalk.git
@@ -135,6 +135,17 @@ elements.'>
structureType == #array ifTrue: [^CArrayCType from: type].
structureType == #ptr ifTrue: [^CPtrCType from: type]
]
+
+ = anObject [
+ ^self class == anObject class and: [
+ self cObjectType = anObject cObjectType
+ ]
+
+ ]
+
+ hash [
+ ^self cObjectType hash bitXor: self cObjectType hash
+ ]
gcNew [
"Allocate a new CObject with the type (class) identified by the receiver.
Mth
_______________________________________________
help-smalltalk mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/help-smalltalk
