Bert Freudenberg uploaded a new version of Graphics to project The Trunk: http://source.squeak.org/trunk/Graphics-bf.368.mcz
==================== Summary ====================
Name: Graphics-bf.368 Author: bf Time: 31 January 2017, 8:55:04.767278 am UUID: 404d8e9d-2ce0-4469-a8f2-f09db034fd1a Ancestors: Graphics-pre.367
Fix setting Display to MSB.
=============== Diff against Graphics-pre.367 ===============
Item was changed: ----- Method: DisplayScreen>>newDepth: (in category 'other') ----- newDepth: pixelSize " Display newDepth: 8. Display newDepth: 1. " | area need | (self supportsDisplayDepth: pixelSize) ifFalse:[^self inform:'Display depth ', pixelSize printString, ' is not supported on this system'].
+ pixelSize = self nativeDepth ifTrue: [^ self "no change"]. - pixelSize = self depth ifTrue: [^ self "no change"]. pixelSize abs < self depth ifFalse: ["Make sure there is enough space" area := self boundingBox area. "pixels"
need := (area * (pixelSize abs - self depth) // 8) "new bytes needed" + Smalltalk lowSpaceThreshold. (Smalltalk garbageCollectMost <= need and: [Smalltalk garbageCollect <= need]) ifTrue: [self error: 'Insufficient free space']].
Display setExtent: Display extent depth: pixelSize. Display beDisplay.
Project current ifNotNil: [:p | p displayDepthChanged; displaySizeChanged].!