-USING: concurrency.count-downs threads kernel tools.test ;\r
-IN: concurrency.count-downs.tests`\r
-\r
-[ ] [ 0 <count-down> await ] unit-test\r
-\r
-[ 1 <count-down> dup count-down count-down ] must-fail\r
-\r
-[ ] [\r
- 1 <count-down>\r
- 3 <count-down>\r
- 2dup [ await count-down ] 2curry "Master" spawn drop\r
- dup [ count-down ] curry "Slave" spawn drop\r
- dup [ count-down ] curry "Slave" spawn drop\r
- dup [ count-down ] curry "Slave" spawn drop\r
- drop await\r
-] unit-test\r
+USING: concurrency.count-downs threads kernel tools.test ;
+IN: concurrency.count-downs.tests`
+
+[ ] [ 0 <count-down> await ] unit-test
+
+[ 1 <count-down> dup count-down count-down ] must-fail
+
+[ ] [
+ 1 <count-down>
+ 3 <count-down>
+ 2dup [ await count-down ] 2curry "Master" spawn drop
+ dup [ count-down ] curry "Slave" spawn drop
+ dup [ count-down ] curry "Slave" spawn drop
+ dup [ count-down ] curry "Slave" spawn drop
+ drop await
+] unit-test