Revert "factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring...

[factor.git] / extra / images / viewer / viewer-tests.factor

diff --git a/extra/images/viewer/viewer-tests.factor b/extra/images/viewer/viewer-tests.factor
index bf132f4a6617b20bfb3addb1f0fe017dc6c3ba9b..98e4e15bcf17d002040d602aa2e4f64c368483ae 100644 (file)
--- a/extra/images/viewer/viewer-tests.factor
+++ b/extra/images/viewer/viewer-tests.factor
@@ -11,15 +11,15 @@ IN: images.viewer.tests
     dup (gen-image) <image> swap >>bitmap swap >>dim
     RGB >>component-order ubyte-components >>component-type ;
 
-{ } [ { 50 50 } gen-image "s" set ] unit-test
-{ } [ "s" get <image-gadget> "ig" set ] unit-test
+[ ] [ { 50 50 } gen-image "s" set ] unit-test
+[ ] [ "s" get <image-gadget> "ig" set ] unit-test
 "ig" get [
    [ t ] [ "ig" get image-gadget-texture single-texture? ] unit-test
 ] with-grafted-gadget
 
-{ } [ "s" get <model> "m" set ] unit-test
-{ } [ { 150 150 } gen-image "s1" set ] unit-test
-{ } [ "m" get <image-control> "ic" set ] unit-test
+[ ] [ "s" get <model> "m" set ] unit-test
+[ ] [ { 150 150 } gen-image "s1" set ] unit-test
+[ ] [ "m" get <image-control> "ic" set ] unit-test
 "ic" get [
    [ t ] [ "ic" get image-gadget-texture single-texture? ] unit-test
    [ { 50 50 } ] [ "ic" get texture>> texture-size ] unit-test