<div dir="ltr"><div dir="ltr"><br></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Tue, Jul 23, 2019 at 8:08 PM <<a href="mailto:commits@source.squeak.org">commits@source.squeak.org</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">A new version of Collections was added to project The Inbox:<br>
<a href="http://source.squeak.org/inbox/Collections-fn.847.mcz" rel="noreferrer" target="_blank">http://source.squeak.org/inbox/Collections-fn.847.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: Collections-fn.847<br>
Author: fn<br>
Time: 23 July 2019, 8:08:29.343315 pm<br>
UUID: 8d7758f5-1062-41e6-8062-7f878c2063b0<br>
Ancestors: Collections-mt.846<br>
<br>
Remove redundant methods for copying from Character (following Chris' suggestion at <a href="http://forum.world.st/The-Trunk-Kernel-fn-1223-mcz-tp5098738p5098777.html" rel="noreferrer" target="_blank">http://forum.world.st/The-Trunk-Kernel-fn-1223-mcz-tp5098738p5098777.html</a>).<br>
<br>
=============== Diff against Collections-mt.846 ===============<br>
<br>
Item was removed:<br>
- ----- Method: Character>>copy (in category 'copying') -----<br>
- copy<br>
-       "Answer the receiver, because Characters are unique."<br>
-       ^self!<br>
<br>
Item was removed:<br>
- ----- Method: Character>>postCopy (in category 'copying') -----<br>
- postCopy<br>
-       "I will never be copied"<br>
-       ^self shouldNotImplement!<br></blockquote><div><br></div><div>Whoops...this should've been the end of the change. We'll need to split this one before merging.</div><div><br></div><div>Fabio</div><div> </div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">
<br>
Item was changed:<br>
  ----- Method: Collection>>fillFrom:with: (in category 'private') -----<br>
  fillFrom: aCollection with: aBlock<br>
        "Evaluate aBlock with each of aCollections's elements as the argument.  <br>
        Collect the resulting values into self. Answer self."<br>
<br>
+       aCollection do: [ :each |<br>
-       aCollection associationsDo: [ :each |<br>
                self add: (aBlock value: each) ]!<br>
<br>
Item was added:<br>
+ ----- Method: Dictionary>>fillFrom:with: (in category 'private') -----<br>
+ fillFrom: aCollection with: aBlock<br>
+       "Evaluate aBlock with each of aCollections's elements as the argument.  <br>
+       Collect the resulting values into self. Answer self."<br>
+ <br>
+       aCollection isDictionary<br>
+               ifFalse:<br>
+                       [aCollection associationsDo:<br>
+                               [ :element | self add: (aBlock value: element)]]<br>
+               ifTrue:<br>
+                       [aCollection keysAndValuesDo:<br>
+                               [ :key :value | self at: key put: (aBlock value: value)]]!<br>
<br>
Item was removed:<br>
- ----- Method: Dictionary>>histogramOf: (in category 'converting') -----<br>
- histogramOf: aBlock<br>
- <br>
-       ^ self collect: [:assoc | aBlock value: assoc value] as: Bag!<br>
<br>
<br>
</blockquote></div></div>