[squeak-dev] The Inbox: EToys-cbc.293.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Apr 17 16:44:54 UTC 2017


A new version of EToys was added to project The Inbox:
http://source.squeak.org/inbox/EToys-cbc.293.mcz

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

Name: EToys-cbc.293
Author: cbc
Time: 17 April 2017, 9:44:25.306187 am
UUID: 7f27f8f3-1ad3-9d4b-a359-1b085c98e5c2
Ancestors: EToys-nice.292

Moved ExternalForm test from FFI package here - since the ExternalForm is now in this package.
Also, fixed test.

=============== Diff against EToys-nice.292 ===============

Item was added:
+ TestCase subclass: #EtoysExternalFormTest
+ 	instanceVariableNames: ''
+ 	classVariableNames: ''
+ 	poolDictionaries: ''
+ 	category: 'Etoys-Tests'!

Item was added:
+ ----- Method: EtoysExternalFormTest>>testBlitToAndFromExternalForm (in category 'as yet unclassified') -----
+ testBlitToAndFromExternalForm
+ 	"Ensure that we can blit to/from all 4 permutatations of Form and ExternalForm."
+ 	| source external1 external2 destination |
+ 	source := Cursor wait asCursorForm asFormOfDepth: 32.
+ 	destination := Form extent: source extent depth: 32.
+ 	external1 := ExternalForm extent: source extent depth: 32.
+ 	external2 := ExternalForm extent: source extent depth: 32.
+ 	self shouldnt: [source bits = destination bits].
+ 	source displayOn: external1.
+ 	external1 displayOn: external2.
+ 	external2 displayOn: destination.
+ 	self should: [source bits = destination bits].!



More information about the Squeak-dev mailing list