]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/images/normalization/normalization-tests.factor
factor: second stab at [ ] [ ] unit-test -> { } [ ] unit-test
[factor.git] / basis / images / normalization / normalization-tests.factor
index 778df760268e6573b6a8ec5eb2f18e650bc30021..7f7c17d7cbca9012342ecbc41af47d801808e452 100644 (file)
@@ -6,87 +6,87 @@ IN: images.normalization.tests
 
 ! 1>x
 
-[ B{ 255 255 } ]
+{ B{ 255 255 } }
 [ B{ 0 1 } 2 2 A L permute ] unit-test
 
-[ B{ 255 255 255 255 } ]
+{ B{ 255 255 255 255 } }
 [ B{ 0 1 } 2 2 A RG permute ] unit-test
 
-[ B{ 255 255 255 255 255 255 } ]
+{ B{ 255 255 255 255 255 255 } }
 [ B{ 0 1 } 2 2 A BGR permute ] unit-test
 
-[ B{ 0 255 255 255 1 255 255 255 } ]
+{ B{ 0 255 255 255 1 255 255 255 } }
 [ B{ 0 1 } 2 2 A ABGR permute ] unit-test
 
 ! Difference stride
 ! The last byte is padding, so it should not end up in the image
 
-[ B{ 255 255 } ]
+{ B{ 255 255 } }
 [ B{ 0 1 0 } 2 3 A L permute ] unit-test
 
-[ B{ 255 255 255 255 } ]
+{ B{ 255 255 255 255 } }
 [ B{ 0 1 0 } 2 3 A RG permute ] unit-test
 
-[ B{ 255 255 255 255 255 255 } ]
+{ B{ 255 255 255 255 255 255 } }
 [ B{ 0 1 0 } 2 3 A BGR permute ] unit-test
 
-[ B{ 0 255 255 255 1 255 255 255 } ]
+{ B{ 0 255 255 255 1 255 255 255 } }
 [ B{ 0 1 0 } 2 3 A ABGR permute ] unit-test
 
 ! 2>x
 
-[ B{ 0 2 } ]
+{ B{ 0 2 } }
 [ B{ 0 1 2 3 } 2 4 LA L permute ] unit-test
 
-[ B{ 255 255 255 255 } ]
+{ B{ 255 255 255 255 } }
 [ B{ 0 1 2 3 } 2 4 LA RG permute ] unit-test
 
-[ B{ 255 255 255 255 255 255 } ]
+{ B{ 255 255 255 255 255 255 } }
 [ B{ 0 1 2 3 } 2 4 LA BGR permute ] unit-test
 
-[ B{ 1 255 255 255 3 255 255 255 } ]
+{ B{ 1 255 255 255 3 255 255 255 } }
 [ B{ 0 1 2 3 } 2 4 LA ABGR permute ] unit-test
 
 ! 3>x
 
-[ B{ 255 255 } ]
+{ B{ 255 255 } }
 [ B{ 0 1 2 3 4 5 } 2 6 RGB L permute ] unit-test
 
-[ B{ 0 1 3 4 } ]
+{ B{ 0 1 3 4 } }
 [ B{ 0 1 2 3 4 5 } 2 6 RGB RG permute ] unit-test
 
-[ B{ 2 1 0 5 4 3 } ]
+{ B{ 2 1 0 5 4 3 } }
 [ B{ 0 1 2 3 4 5 } 2 6 RGB BGR permute ] unit-test
 
-[ B{ 255 2 1 0 255 5 4 3 } ]
+{ B{ 255 2 1 0 255 5 4 3 } }
 [ B{ 0 1 2 3 4 5 } 2 6 RGB ABGR permute ] unit-test
 
 ! 4>x
 
-[ B{ 255 255 } ]
+{ B{ 255 255 } }
 [ B{ 0 1 2 3 4 5 6 7 } 2 8 RGBA L permute ] unit-test
 
-[ B{ 0 1 4 5 } ]
+{ B{ 0 1 4 5 } }
 [ B{ 0 1 2 3 4 5 6 7 } 2 8 RGBA RG permute ] unit-test
 
-[ B{ 2 1 0 6 5 4 } ]
+{ B{ 2 1 0 6 5 4 } }
 [ B{ 0 1 2 3 4 5 6 7 } 2 8 RGBA BGR permute ] unit-test
 
-[ B{ 3 2 1 0 7 6 5 4 } ]
+{ B{ 3 2 1 0 7 6 5 4 } }
 [ B{ 0 1 2 3 4 5 6 7 } 2 8 RGBA ABGR permute ] unit-test
 
 ! Edge cases
 
-[ B{ 0 4 } ]
+{ B{ 0 4 } }
 [ B{ 0 1 2 3 4 5 6 7 } 2 8 RGBA R permute ] unit-test
 
-[ B{ 255 0 1 2 255 4 5 6 } ]
+{ B{ 255 0 1 2 255 4 5 6 } }
 [ B{ 0 1 2 3 4 5 6 7 } 2 8 RGBA XRGB permute ] unit-test
 
-[ B{ 1 2 3 255 5 6 7 255 } ]
+{ B{ 1 2 3 255 5 6 7 255 } }
 [ B{ 0 1 2 3 4 5 6 7 } 2 8 XRGB RGBA permute ] unit-test
 
-[ B{ 255 255 255 255 255 255 255 255 } ]
+{ B{ 255 255 255 255 255 255 255 255 } }
 [ B{ 0 1 } 2 2 L RGBA permute ] unit-test
 
 ! Invalid inputs