A new version of CollectionsTests was added to project The Inbox:
http://source.squeak.org/inbox/CollectionsTests-ct.347.mcz==================== Summary ====================
Name: CollectionsTests-ct.347
Author: ct
Time: 7 December 2020, 6:46:54.870326 pm
UUID: 1de6ec63-21e0-7248-acc6-4b0e71a82475
Ancestors: CollectionsTests-mt.346
Tests Collections-ct.922 (Dictionary >> #at:put:during:).
=============== Diff against CollectionsTests-mt.346 ===============
Item was added:
+ ----- Method: DictionaryTest>>testAtPutDuring (in category 'tests - basic') -----
+ testAtPutDuring
+
+ | dictionary |
+ dictionary := Dictionary new.
+
+ dictionary at: #a put: 3 during: [
+ self assert: 3 equals: (dictionary at: #a)].
+ self deny: (dictionary includesKey: #a).
+
+ dictionary
+ at: #a put: 2;
+ at: #a put: 3 during: [
+ self assert: 3 equals: (dictionary at: #a)].
+ self assert: 2 equals: (dictionary at: #a).
+
+ dictionary at: #a put: 3 during: [
+ self assert: 3 equals: (dictionary at: #a).
+ dictionary at: #a put: 4].
+ self assert: 4 equals: (dictionary at: #a).
+ self fail.
+ dictionary
+ at: #a put: 2;
+ at: #a put: 3 during: [
+ self assert: 3 equals: (dictionary at: #a).
+ dictionary removeKey: #a].
+ self deny: (dictionary includesKey: #a).!