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

[factor.git] / basis / io / monitors / recursive / recursive-tests.factor

diff --git a/basis/io/monitors/recursive/recursive-tests.factor b/basis/io/monitors/recursive/recursive-tests.factor
index ef4c4656e43f0f281cbcae75ab78844e3dfbd739..8bfb49297fcf5a77e8264994d26ee2bfef85797f 100644 (file)
--- a/basis/io/monitors/recursive/recursive-tests.factor
+++ b/basis/io/monitors/recursive/recursive-tests.factor
@@ -28,18 +28,18 @@ M: mock-io-backend (monitor)
 M: mock-io-backend link-info
     global [ link-info ] with-variables ;
 
-[ ] [ 0 mock-counter boa dummy-monitor-created set ] unit-test
-[ ] [ 0 mock-counter boa dummy-monitor-disposed set ] unit-test
+{ } [ 0 mock-counter boa dummy-monitor-created set ] unit-test
+{ } [ 0 mock-counter boa dummy-monitor-disposed set ] unit-test
 
-[ ] [
+{ } [
     mock-io-backend io-backend [
         "resource:core/io" resource-path <mailbox> <recursive-monitor> dispose
     ] with-variable
 ] unit-test
 
-[ t ] [ dummy-monitor-created get i>> 0 > ] unit-test
+{ t } [ dummy-monitor-created get i>> 0 > ] unit-test
 
-[ t ] [ dummy-monitor-created get i>> dummy-monitor-disposed get i>> = ] unit-test
+{ t } [ dummy-monitor-created get i>> dummy-monitor-disposed get i>> = ] unit-test
 
 [ "doesnotexist" temp-file delete-tree ] ignore-errors
 
@@ -51,11 +51,11 @@ M: mock-io-backend link-info
     ] with-variable
 ] must-fail
 
-[ ] [ 0 mock-counter boa dummy-monitor-created set ] unit-test
-[ ] [ 0 mock-counter boa dummy-monitor-disposed set ] unit-test
+{ } [ 0 mock-counter boa dummy-monitor-created set ] unit-test
+{ } [ 0 mock-counter boa dummy-monitor-disposed set ] unit-test
 
 ! Test that disposing twice is allowed
-[ ] [
+{ } [
     "resource:core/io" resource-path <mailbox> <recursive-monitor>
     [ dispose ] [ dispose ] bi
 ] unit-test