Eliot Miranda uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-eem.379.mcz
==================== Summary ====================
Name: Tests-eem.379 Author: eem Time: 3 July 2017, 4:13:10.068801 pm UUID: cdac3950-d5ff-488a-b17c-a733bd79b74e Ancestors: Tests-eem.378
Use the abstract class-side interface for image segment use now that we have both LegacyImageSegment and NativeImageSegment.
=============== Diff against Tests-eem.378 ===============
Item was changed: ----- Method: BitmapStreamTests>>validateImageSegment (in category 'private') ----- validateImageSegment "array is set up with an array." | other filename | filename := 'bitmapStreamTest.extSeg'.
FileDirectory default deleteFileNamed: filename ifAbsent: [ ].
+ (ImageSegment copyFromRootsForExport: {array}) - (ImageSegment new copyFromRootsForExport: (Array with: array)) writeForExport: filename.
other := (FileDirectory default readOnlyFileNamed: filename) fileInObjectAndCode.
self assert: array = other originalRoots first. "clean up disk" FileDirectory default deleteFileNamed: filename ifAbsent: [ ]!
Item was changed: ----- Method: ImageSegmentTest>>testImageSegmentsShouldBeWritableToaFile (in category 'testing') ----- testImageSegmentsShouldBeWritableToaFile "This should not throw an exception" | classes | classes := UIManager subclasses reject: [:sc| sc isActiveManager]. + NativeImageSegment new - ImageSegment new copyFromRoots: classes asArray sizeHint: 100; extract; writeToFile: 'InactiveUIManagers'; yourself. "TODO: write assertions showing that something meaningful actually happened."
"now bring them back in again" classes do: [:ea| ea new]!
squeak-dev@lists.squeakfoundation.org