RegressionTests__ImageTests.st
changeset 1688 62ad31c3a464
parent 1687 30597c99b668
child 1689 a026f67f0767
--- a/RegressionTests__ImageTests.st	Tue Aug 22 18:53:22 2017 +0200
+++ b/RegressionTests__ImageTests.st	Tue Aug 22 18:55:23 2017 +0200
@@ -177,8 +177,7 @@
 test09_FillRectangle
     |depths colors rectangle|
 
-    "/ So far not really supported for other depths (at least not in this straightforward way).
-    depths := { 24 . 32 }.
+    depths := { 16 . 24 . 32 }.
     colors := {
             Color red.
             Color green.
@@ -187,11 +186,7 @@
             Color black
         }.
         
-    rectangle := Rectangle 
-            left:0
-            top:0
-            width:1
-            height:1.
+    rectangle := Rectangle left:0 top:0 width:1 height:1.
             
     depths do:[:depth | 
         |img|
@@ -205,29 +200,6 @@
     ].
 
     "Created: / 22-08-2017 / 18:45:44 / cg"
-!
-
-test10_FillWhite
-    |depths colors rectangle|
-
-    "/ So far not really supported for other depths (at least not in this straightforward way).
-    depths := { 24. 32 }.
-    colors := { Color red. Color green. Color blue. Color white. Color black }.
-    rectangle := Rectangle left:0 top:0 width:1 height:1.
-
-    depths do:[ :depth |
-        |img|
-
-        img := Image extent:1@1 depth:depth.
-        img createPixelStore.
-
-        colors do:[ :color |
-            img fillRectangle:rectangle withColor:color.
-            self assert:((img colorAt:0@0) = color).
-        ].
-    ].
-
-    "Created: / 22-08-2017 / 18:45:37 / cg"
 ! !
 
 !ImageTests class methodsFor:'documentation'!