The Trunk: CollectionsTests-mt.317.mcz

Marcel Taeumel uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-mt.317.mcz

==================== Summary ====================

Name: CollectionsTests-mt.317
Author: mt
Time: 9 September 2019, 10:10:17.054051 am
UUID: 95680430-56b5-c741-b406-b46897141bf3
Ancestors: CollectionsTests-ct.316, CollectionsTests-mt.315

Merges CollectionsTests-mt.315. See Collections-mt.853.

=============== Diff against CollectionsTests-ct.316 ===============

Item was changed:
  ----- Method: CollectionTest>>testPrintOnDelimiter (in category 'tests') -----
  testPrintOnDelimiter
  | delim |
  delim := ', '.
  {OrderedCollection new. Set new.} do:
  [ :coll | | emptyStream oneItemStream multiItemStream |
  emptyStream := String new writeStream.
  coll printOn: emptyStream delimiter: delim.
  self assert: emptyStream contents = ''.
 
  coll add: 1.
  oneItemStream := String new writeStream.
  coll printOn: oneItemStream delimiter: delim.
  self assert: oneItemStream contents = '1'.
 
  coll add: 2; add: 3.
  multiItemStream := String new writeStream.
  coll printOn: multiItemStream delimiter: ', '.
+ self assert: multiItemStream contents = '1, 2, 3'.
+
+ multiItemStream := String new writeStream.
+ coll printOn: multiItemStream delimiter: ', ' printString.
  self assert: multiItemStream contents = '1'', ''2'', ''3'.]!