Issue #82: UIPainterView does not understand: #deviceClippingRectangle
The fix is two-fold:
* Fixes call to #deviceClippingRectangle in method that were marked as
obsolete but were used. Funny enough the comment said that those are never
invoked on Win NT,XP and later. Only that they are.
* Fixes initialization of `Form` which has been broken on delegated-gc
branch - black and white were swapped so displaying grid in UI painter
actually shown just solid black/gray background.
This should fix the issue.
https://swing.fit.cvut.cz/projects/stx-jv/ticket/82
"{ Package: 'stx:libview/tests' }"
"{ NameSpace: Smalltalk }"
TestCase subclass:#FormTests
instanceVariableNames:''
classVariableNames:''
poolDictionaries:''
category:'Compatibility-ST80-Graphics-Display Objects-Tests'
!
!FormTests methodsFor:'running'!
setUp
self skipIf: Display isNil description: 'Display connection not available'
"Created: / 25-04-2016 / 20:30:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!FormTests methodsFor:'tests - regression'!
test_issue_82
"
https://swing.fit.cvut.cz/projects/stx-jv/ticket/82
"
| f |
f := Form width:8 height:8 depth:1.
f colorMap:(Array with:Screen current blackColor with: Screen current whiteColor).
f clear.
f paint:(Color colorId:1).
self assert: (f bits allSatisfy:[:byte | byte = 0 ])
"Created: / 25-04-2016 / 20:04:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !