Marcel Taeumel uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-mt.330.mcz==================== Summary ====================
Name: CollectionsTests-mt.330
Author: mt
Time: 16 December 2019, 12:01:26.779045 pm
UUID: 779ba425-f187-324a-9b83-27c0e2c70ba3
Ancestors: CollectionsTests-mt.329
Adds a generator test that got only documented on the mailing list so far.
=============== Diff against CollectionsTests-mt.329 ===============
Item was added:
+ ----- Method: GeneratorTest>>testYieldLookAhead (in category 'tests') -----
+ testYieldLookAhead
+ "Check the look-ahead in our current implementation. See
http://forum.world.st/Generators-td4941886.html."
+
+ | x gen result |
+ x := 0.
+
+ gen := Generator on: [:g |
+ x := 1.
+ g yield: nil.
+
+ x := 2.
+ g yield: nil.
+
+ x := 3.
+ g yield: nil].
+
+ result := OrderedCollection new.
+ gen do: [:i | result add: x].
+
+ self deny: (result hasEqualElements: #(1 2 3)).
+ self assert: (result hasEqualElements: #(2 3 3)).!