Marcel Taeumel uploaded a new version of CollectionsTests to project The Trunk: http://source.squeak.org/trunk/CollectionsTests-EG.342.mcz
==================== Summary ====================
Name: CollectionsTests-EG.342 Author: EG Time: 7 August 2020, 8:18:24.376363 pm UUID: cd08c4bb-0a50-4a33-9fd1-96876f07f3e0 Ancestors: CollectionsTests-ul.341
Adding tests for the updated #peekBack behavior
=============== Diff against CollectionsTests-ul.341 ===============
Item was added: + ----- Method: ReadStreamTest>>testPeekBack (in category 'tests - back') ----- + testPeekBack + "Test the ability to peek backwards on the stream" + | stream | + stream := ReadStream on: 'abcd'. + stream skip: 2. + self assert: $b equals: stream peekBack!
Item was added: + ----- Method: ReadStreamTest>>testPeekBackOnPosition1 (in category 'tests - back') ----- + testPeekBackOnPosition1 + "Ensure that #peekBack works from position 1, + giving us the first element in the stream" + | stream | + stream := ReadStream on: 'abcde'. + stream skip: 1. + self assert: $a equals: stream peekBack!
Item was added: + ----- Method: ReadStreamTest>>testPeekBackOnPositionZero (in category 'tests - back') ----- + testPeekBackOnPositionZero + "Ensure that we *cannot* peekBack on a stream + that is currently at the start (zero) position" + | stream | + stream := ReadStream on: 'abcd'. + self + should: [ stream peekBack ] + raise: Error!
squeak-dev@lists.squeakfoundation.org