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

[factor.git] / basis / timers / timers-tests.factor

diff --git a/basis/timers/timers-tests.factor b/basis/timers/timers-tests.factor
index 8e1a6cfc702fadcff0cb56b12505c2bad7e85915..e299e29cad9e2758cfcd078c0874f48aa434b5a6 100644 (file)
--- a/basis/timers/timers-tests.factor
+++ b/basis/timers/timers-tests.factor
@@ -3,7 +3,7 @@ concurrency.promises fry kernel math math.order sequences
 threads tools.test tools.time ;
 IN: timers.tests
 
-{ } [
+[ ] [
     1 <count-down>
     { f } clone 2dup
     [ first stop-timer count-down ] 2curry 1 seconds later
@@ -11,12 +11,12 @@ IN: timers.tests
     await
 ] unit-test
 
-{ } [
+[ ] [
     self [ resume ] curry instant later drop
     "test" suspend drop
 ] unit-test
 
-{ t } [
+[ t ] [
     [
         <promise>
         [ '[ t _ fulfill ] 2 seconds later drop ]
@@ -24,41 +24,41 @@ IN: timers.tests
     ] benchmark 1,500,000,000 2,500,000,000 between?
 ] unit-test
 
-{ { 3 } } [
+[ { 3 } ] [
     { 3 } dup
     '[ 4 _ set-first ] 2 seconds later
     1/2 seconds sleep
     stop-timer
 ] unit-test
 
-{ { 1 } } [
+[ { 1 } ] [
     { 0 }
     dup '[ 0 _ [ 1 + ] change-nth ] 3 seconds later
     [ stop-timer ] [ start-timer ] bi
     4 seconds sleep
 ] unit-test
 
-{ { 0 } } [
+[ { 0 } ] [
     { 0 }
     dup '[ 3 seconds sleep 1 _ set-first ] 1 seconds later
     2 seconds sleep stop-timer
     1/2 seconds sleep
 ] unit-test
 
-{ { 0 } } [
+[ { 0 } ] [
     { 0 }
     dup '[ 1 _ set-first ] 300 milliseconds later
     150 milliseconds sleep
     [ restart-timer ] [ 200 milliseconds sleep stop-timer ] bi
 ] unit-test
 
-{ { 1 } } [
+[ { 1 } ] [
     { 0 }
     dup '[ 0 _ [ 1 + ] change-nth ] 200 milliseconds later
     100 milliseconds sleep restart-timer 300 milliseconds sleep
 ] unit-test
 
-{ { 4 } } [
+[ { 4 } ] [
     { 0 }
     dup '[ 0 _ [ 1 + ] change-nth ] 300 milliseconds 300 milliseconds
     <timer> dup start-timer