Eliot Miranda uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-eem.608.mcz
==================== Summary ====================
Name: Kernel-eem.608 Author: eem Time: 19 July 2011, 9:46:25.127 am UUID: 0c48ee9d-2fdf-4ad9-9f55-5187010b71f7 Ancestors: Kernel-ul.607
Fix CompiledMethod>>hasLiteral: to not look for ==, but literal equal (class == & value =)
=============== Diff against Kernel-ul.607 ===============
Item was changed: ----- Method: CompiledMethod>>hasLiteral: (in category 'literals') ----- hasLiteral: literal + | litClass lit | "Answer whether the receiver references the argument, literal." + litClass := literal class. + 2 to: self numLiterals - 1 do: "exclude superclass + selector/properties" + [:index | + lit := self objectAt: index. + (litClass == lit class and: [literal = lit]) ifTrue: [^true]]. - 2 to: self numLiterals - 1 "exclude superclass + selector/properties" - do:[:index | - literal == (self objectAt: index) ifTrue: [^true]]. ^false!
packages@lists.squeakfoundation.org