Chris Muller uploaded a new version of CollectionsTests to project The Trunk: http://source.squeak.org/trunk/CollectionsTests-cmm.405.mcz
==================== Summary ====================
Name: CollectionsTests-cmm.405 Author: cmm Time: 18 February 2024, 5:22:35.213846 pm UUID: fa6e9709-7f5a-4781-b197-45bd9a9e1414 Ancestors: CollectionsTests-cmm.404
Include, in #testPeeks, the cases where the argument overshoots the bounds of the underlying stream, in either direction.
=============== Diff against CollectionsTests-cmm.404 ===============
Item was changed: ----- Method: ReadStreamTest>>testPeeks (in category 'tests - accessing') ----- testPeeks | stream | stream := self streamOnArray. self assert: (stream peek: 0) = #(). self assert: (stream peek: 1) = #(1). self assert: (stream peek: 3) = #(1 (a b c) false). self assert: (stream peek: 4) = #(1 (a b c) false). stream next.
self assert: (stream peek: -1) = #(1). + self assert: (stream peek: -99) = #(1). self assert: (stream peek: 0) = #(). self assert: (stream peek: 1) = #((a b c)). + self assert: (stream peek: 3) = #((a b c) false). + self assert: (stream peek: 99) = #((a b c) false)! - self assert: (stream peek: 3) = #((a b c) false).!
packages@lists.squeakfoundation.org