[squeak-dev] The Trunk: Tests-eem.379.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Jul 3 23:13:19 UTC 2017


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]!



More information about the Squeak-dev mailing list