The Trunk: MorphicTests-mt.49.mcz

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

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

Name: MorphicTests-mt.49
Author: mt
Time: 9 January 2019, 9:03:20.071737 am
UUID: 5059d74b-faf5-4c8c-89e9-1afe93a71d2c
Ancestors: MorphicTests-mt.48

Adds a test to ensure full-refresh culling works for system windows.

Complementary update for Morphic-mt.1474.

=============== Diff against MorphicTests-mt.48 ===============

Item was added:
+ TestCase subclass: #SystemWindowTest
+ instanceVariableNames: 'sut'
+ classVariableNames: ''
+ poolDictionaries: ''
+ category: 'MorphicTests-Widgets'!

Item was added:
+ ----- Method: SystemWindowTest>>setUp (in category 'as yet unclassified') -----
+ setUp
+
+ super setUp.
+ sut := SystemWindow new.!

Item was added:
+ ----- Method: SystemWindowTest>>test01Culling (in category 'as yet unclassified') -----
+ test01Culling
+ "Check whether system windows follow the specs for occlusion culling. See WorldState >> #drawWorld:submorphs:invalidAreasOn: and Morph >> #areasRemainingToFill:."
+
+ sut extent: 500@500; fullBounds.
+
+ self assert: (sut areasRemainingToFill: (20@20 center: sut center)) isEmpty.
+ self assert: (sut areasRemainingToFill: sut bounds) isEmpty.
+ self assert: (sut areasRemainingToFill: sut outerBounds) isEmpty.
+ self assert: (sut areasRemainingToFill: sut fullBounds) isEmpty.!