Patrick Rein uploaded a new version of CollectionsTests to project The Trunk: http://source.squeak.org/trunk/CollectionsTests-pre.384.mcz
==================== Summary ====================
Name: CollectionsTests-pre.384 Author: pre Time: 2 January 2023, 1:27:06.565278 pm UUID: 3a23c00a-1e5e-384a-a797-cfb8250f46fe Ancestors: CollectionsTests-pre.383
Improves on the LimitedWriteStreamTests: - adds a test case for the stream contents - fixes the literal in the limit block test - removes accidentially committed expectedFailure
(sorry for the noise)
=============== Diff against CollectionsTests-pre.383 ===============
Item was removed: - ----- Method: LimitedWriteStreamTest>>expectedFailure (in category 'failures') ----- - expectedFailure - - ^ #(testPutSymbolOnLimitedStringStream)!
Item was changed: ----- Method: LimitedWriteStreamTest>>expectedFailures (in category 'failures') ----- expectedFailures
+ ^ #(testPutSymbolOnLimitedStringStream testStreamContentsPutSymbolOnLimitedStringStream)! - ^ #(testPutSymbolOnLimitedStringStream)!
Item was changed: ----- Method: LimitedWriteStreamTest>>testPutSymbolOnLimitedStringStream (in category 'tests') ----- testPutSymbolOnLimitedStringStream
| stream result | stream := LimitedWriteStream on: (String new: 5). stream setLimit: 5 limitBlock: [result := stream contents]. #abcdef printOn: stream. self + assert: '#abcd' + equals: result.! - assert: '#''abc' - equals: result. - !
Item was added: + ----- Method: LimitedWriteStreamTest>>testStreamContentsPutSymbolOnLimitedStringStream (in category 'tests') ----- + testStreamContentsPutSymbolOnLimitedStringStream + + | stream result | + stream := LimitedWriteStream on: (String new: 5). + stream setLimit: 5 limitBlock: [result := stream contents]. + #abcdef printOn: stream. + self + assert: '#abcd' + equals: stream contents. + !
packages@lists.squeakfoundation.org