Nicolas Cellier uploaded a new version of ToolsTests to project The Trunk: http://source.squeak.org/trunk/ToolsTests-nice.69.mcz
==================== Summary ====================
Name: ToolsTests-nice.69 Author: nice Time: 27 July 2014, 3:55:03.028 pm UUID: 53091322-737b-4b76-9e47-2e35cefb723b Ancestors: ToolsTests-cmm.68
Don't use a ReadWriteStream when our intention is just to sequentially write then read. ReadWriteStream and its complexity should be reserved to random read/write access. Instead, write on a WriteStream, then read from a ReadStream using new conveniency WriteStream>>readStream..
=============== Diff against ToolsTests-cmm.68 ===============
Item was changed: ----- Method: FileContentsBrowserTest>>setUp (in category 'as yet unclassified') ----- setUp | fileout testCat package packageDict organizer | testCat := self class category. + fileout := WriteStream on: (String new: 10000). - fileout := ReadWriteStream on: (String new: 10000). SystemOrganization fileOutCategory: testCat on: fileout.
packageDict := Dictionary new. browser := FileContentsBrowser new. organizer := SystemOrganizer defaultList: Array new. + package := (FilePackage new fullName: testCat; fileInFrom: fileout readStream). - package := (FilePackage new fullName: testCat; fileInFrom: fileout). packageDict at: package packageName put: package. organizer classifyAll: package classes keys under: package packageName. (browser := FileContentsBrowser systemOrganizer: organizer) packages: packageDict.!
squeak-dev@lists.squeakfoundation.org