factor: second stab at [ ] [ ] unit-test -> { } [ ] unit-test

[factor.git] / basis / bootstrap / image / image-tests.factor

diff --git a/basis/bootstrap/image/image-tests.factor b/basis/bootstrap/image/image-tests.factor
index c5c6460041ecdf495180307b9745b4758fcf317e..0c2bfb87336bd0e307e828048ffc89f1c655e4e6 100644 (file)
--- a/basis/bootstrap/image/image-tests.factor
+++ b/basis/bootstrap/image/image-tests.factor
@@ -2,18 +2,18 @@ USING: bootstrap.image bootstrap.image.private tools.test
 kernel math ;
 IN: bootstrap.image.tests
 
-[ f ] [ { 1 2 3 } [ 1 2 3 ] eql? ] unit-test
+{ f } [ { 1 2 3 } [ 1 2 3 ] eql? ] unit-test
 
-[ t ] [ [ 1 2 3 ] [ 1 2 3 ] eql? ] unit-test
+{ t } [ [ 1 2 3 ] [ 1 2 3 ] eql? ] unit-test
 
-[ f ] [ [ 2drop 0 ] [ 2drop 0.0 ] eql? ] unit-test
+{ f } [ [ 2drop 0 ] [ 2drop 0.0 ] eql? ] unit-test
 
-[ t ] [ [ 2drop 0 ] [ 2drop 0 ] eql? ] unit-test
+{ t } [ [ 2drop 0 ] [ 2drop 0 ] eql? ] unit-test
 
-[ f ] [ \ + [ 2drop 0 ] eql? ] unit-test
+{ f } [ \ + [ 2drop 0 ] eql? ] unit-test
 
-[ f ] [ 3 [ 0 1 2 ] eql? ] unit-test
+{ f } [ 3 [ 0 1 2 ] eql? ] unit-test
 
-[ f ] [ 3 3.0 eql? ] unit-test
+{ f } [ 3 3.0 eql? ] unit-test
 
-[ t ] [ 4.0 4.0 eql? ] unit-test
+{ t } [ 4.0 4.0 eql? ] unit-test