<div dir="ltr">Why not implement Dictionary replace:?<br></div><div class="gmail_extra"><br><div class="gmail_quote">2015-05-06 20:11 GMT+02:00 <span dir="ltr"><<a href="mailto:commits@source.squeak.org" target="_blank">commits@source.squeak.org</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Levente Uzonyi uploaded a new version of KernelTests to project The Trunk:<br>
<a href="http://source.squeak.org/trunk/KernelTests-ul.295.mcz" target="_blank">http://source.squeak.org/trunk/KernelTests-ul.295.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: KernelTests-ul.295<br>
Author: ul<br>
Time: 6 May 2015, 2:35:40.628 pm<br>
UUID: bd2d63b5-9819-4e81-b1e0-d14594c158ad<br>
Ancestors: KernelTests-ul.294<br>
<br>
Fix: Dictionary DNU #replace:<br>
<br>
=============== Diff against KernelTests-ul.294 ===============<br>
<br>
Item was changed:<br>
----- Method: CompiledMethodComparisonTest>>testHash (in category 'tests') -----<br>
testHash<br>
<timeout: 120><br>
<br>
| ai |<br>
ai := CompiledMethod allInstances.<br>
"We assume here that if two CompiledMethods are equal then they have the same size and header."<br>
+ (ai groupBy: [ :method | { method size. method header } ]) values<br>
+ replace: [ :each | each asArray ];<br>
- ((ai<br>
- groupBy: [ :method | { method size. method header } ])<br>
- replace: [ :each | each asArray ])<br>
do: [ :methods |<br>
1 to: methods size do: [ :i |<br>
i to: methods size do: [ :j |<br>
(methods at: i) = (methods at: j) ifTrue: [<br>
self assert: (methods at: i) hash equals: (methods at: i) hash ] ] ] ]<br>
displayingProgress: 'Testing hashes'.<br>
self assert: (ai collect: [ :cm | cm hash ] as: Set) size * 2 >= ai asSet size!<br>
<br>
<br>
</blockquote></div><br></div>