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

[factor.git] / extra / gdbm / gdbm-tests.factor

diff --git a/extra/gdbm/gdbm-tests.factor b/extra/gdbm/gdbm-tests.factor
index dc4f2b2bf29bee4763826f3b7aceafee828a30ec..c9e32f3f883e9596693d790adb8bb2acac21151b 100644 (file)
--- a/extra/gdbm/gdbm-tests.factor
+++ b/extra/gdbm/gdbm-tests.factor
@@ -18,15 +18,15 @@ CLEANUP
     test.db reader >>role [ ] with-gdbm
 ] [ gdbm-file-open-error = ] must-fail-with
 
-[ f ] [ [ "foo" exists? ] with-test.db ] unit-test
+{ f } [ [ "foo" exists? ] with-test.db ] unit-test
 
-[ ] [ [ "foo" 41 insert ] with-test.db ] unit-test
+{ } [ [ "foo" 41 insert ] with-test.db ] unit-test
 
 [
     db-path [ "foo" 42 insert ] with-gdbm-writer
 ] [ gdbm-cannot-replace = ] must-fail-with
 
-[ ]
+{ }
 [
     [
         "foo" 42 replace
@@ -35,9 +35,9 @@ CLEANUP
     ] with-test.db
 ] unit-test
 
-[ 42 t ] [ db-path [ "foo" fetch* ] with-gdbm-reader ] unit-test
+{ 42 t } [ db-path [ "foo" fetch* ] with-gdbm-reader ] unit-test
 
-[ f f ] [ [ "unknown" fetch* ] with-test.db ] unit-test
+{ f f } [ [ "unknown" fetch* ] with-test.db ] unit-test
 
 [
     [
@@ -45,14 +45,14 @@ CLEANUP
     ] with-test.db
 ] [ gdbm-option-already-set = ] must-fail-with
 
-[ t ]
+{ t }
 [
     V{ } [ [ 2array append ] each-record ] with-test.db
     V{ "foo" "bar" "baz" 42 43 44 } set=
 
 ] unit-test
 
-[ f ]
+{ f }
 [
     test.db newdb >>role [ "foo" exists? ] with-gdbm
 ] unit-test