Hi guys. I found a problem while working with FuelPreview where we store
objects of the graph in a Set. While doing a collect, there was an error
because an implementation of #= was assuming that the argument was of a
certain shape. Of course, that should answer false instead. So I wrote this
test to see all existing wrong implementations:
testAllClassesImplementSafeEqualsMethod
"This tests that all classes in the system that implements #= do it in a
way that they don't throw error when passing as an argument something
different from expected. The correct behavior is that #= answers false."
| wrongClasses |
wrongClasses := IdentityDictionary new.
((SystemNavigation default allImplementorsOf: #=)
collect: [:each | each methodClass])
do: [:each |
| instance |
"Some classes like CompiledMethod override basicNew to
throw an error.
In any case, the comparison will be false, so no problem"
[instance := each basicNew] on: Error do: [].
[instance = Object new]
on: Error
do: [: err | wrongClasses at: each put: err ]].
self assert: wrongClasses isEmpty
The result is: {Magnitude. WideCharacterSet. KMKeymap. MCMockDefinition.
ScaledDecimal. MCSnapshot}
So, my I think we should change #= in those classes by adding:
self == aKeymap
ifTrue: [ ^ true ].
self class = aKeymap class
ifFalse: [ ^ false ].
at the beginning of the #=
what do you think? if agree, I open an issue.
--
Mariano
http://marianopeck.wordpress.com