factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring tool!

[factor.git] / basis / regexp / combinators / combinators-tests.factor

diff --git a/basis/regexp/combinators/combinators-tests.factor b/basis/regexp/combinators/combinators-tests.factor
index 85fa190bfe8334730dd4ef3658b46e5535be146a..23583bdf26a91907528a039be70679d9a9a6b7bc 100644 (file)
--- a/basis/regexp/combinators/combinators-tests.factor
+++ b/basis/regexp/combinators/combinators-tests.factor
@@ -6,23 +6,23 @@ IN: regexp.combinators.tests
 : strings ( -- regexp )
     { "foo" "bar" "baz" } <any-of> ;
 
-[ t t t ] [ "foo" "bar" "baz" [ strings matches? ] tri@ ] unit-test
-[ f f f ] [ "food" "ibar" "ba" [ strings matches? ] tri@ ] unit-test
+{ t t t } [ "foo" "bar" "baz" [ strings matches? ] tri@ ] unit-test
+{ f f f } [ "food" "ibar" "ba" [ strings matches? ] tri@ ] unit-test
 
 : conj ( -- regexp )
     { R' .*a' R' b.*' } <and> ;
 
-[ t ] [ "bljhasflsda" conj matches? ] unit-test
-[ f ] [ "bsdfdfs" conj matches? ] unit-test
-[ f ] [ "fsfa" conj matches? ] unit-test
+{ t } [ "bljhasflsda" conj matches? ] unit-test
+{ f } [ "bsdfdfs" conj matches? ] unit-test
+{ f } [ "fsfa" conj matches? ] unit-test
 
-[ f ] [ "bljhasflsda" conj <not> matches? ] unit-test
-[ t ] [ "bsdfdfs" conj <not> matches? ] unit-test
-[ t ] [ "fsfa" conj <not> matches? ] unit-test
+{ f } [ "bljhasflsda" conj <not> matches? ] unit-test
+{ t } [ "bsdfdfs" conj <not> matches? ] unit-test
+{ t } [ "fsfa" conj <not> matches? ] unit-test
 
-[ f f ] [ "" "hi" [ <nothing> matches? ] bi@ ] unit-test
-[ t t ] [ "" "hi" [ <nothing> <not> matches? ] bi@ ] unit-test
+{ f f } [ "" "hi" [ <nothing> matches? ] bi@ ] unit-test
+{ t t } [ "" "hi" [ <nothing> <not> matches? ] bi@ ] unit-test
 
-[ { t t t f } ] [ { "" "a" "aaaaa" "aab" } [ "a" <literal> <zero-or-more> matches? ] map ] unit-test
-[ { f t t f } ] [ { "" "a" "aaaaa" "aab" } [ "a" <literal> <one-or-more> matches? ] map ] unit-test
-[ { t t f f } ] [ { "" "a" "aaaaa" "aab" } [ "a" <literal> <option> matches? ] map ] unit-test
+{ { t t t f } } [ { "" "a" "aaaaa" "aab" } [ "a" <literal> <zero-or-more> matches? ] map ] unit-test
+{ { f t t f } } [ { "" "a" "aaaaa" "aab" } [ "a" <literal> <one-or-more> matches? ] map ] unit-test
+{ { t t f f } } [ { "" "a" "aaaaa" "aab" } [ "a" <literal> <option> matches? ] map ] unit-test