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

[factor.git] / extra / io / streams / peek / peek-tests.factor

diff --git a/extra/io/streams/peek/peek-tests.factor b/extra/io/streams/peek/peek-tests.factor
index 7f9f9a4e424188cbb9b8fe0c94f8391ce4912bc0..b4a7b90f7a0f41572cf4a25ace47a523998edfa3 100644 (file)
--- a/extra/io/streams/peek/peek-tests.factor
+++ b/extra/io/streams/peek/peek-tests.factor
@@ -6,45 +6,45 @@ io.streams.memory io.streams.peek io.streams.string kernel make
 namespaces sequences strings tools.test ;
 IN: io.streams.peek.tests
 
-{ CHAR: a }
+[ CHAR: a ]
 [ "abc" <string-reader> <peek-stream> stream-read1 ] unit-test
 
-{ CHAR: a }
+[ CHAR: a ]
 [ "abc" <string-reader> <peek-stream> stream-peek1 ] unit-test
 
-{ f }
+[ f ]
 [ "" <string-reader> <peek-stream> stream-peek1 ] unit-test
 
-{ CHAR: a }
+[ CHAR: a ]
 [ "abc" <string-reader> <peek-stream> stream-peek1 ] unit-test
 
-{ "ab" 99 }
+[ "ab" 99 ]
 [ "abc" <string-reader> <peek-stream> "c" swap stream-read-until ] unit-test
 
-{ "ab" f }
+[ "ab" f ]
 [ "ab" <string-reader> <peek-stream> "c" swap stream-read-until ] unit-test
 
-{ CHAR: a }
+[ CHAR: a ]
 [
     "abc" <string-reader> <peek-stream>
     [ stream-peek1 drop ]
     [ stream-peek1 ] bi
 ] unit-test
 
-{ "ab" }
+[ "ab" ]
 [
     "abc" <string-reader> <peek-stream>
     2 swap stream-peek
 ] unit-test
 
-{ "ab" }
+[ "ab" ]
 [
     "abc" <string-reader> <peek-stream>
     2 over stream-peek drop
     2 swap stream-peek
 ] unit-test
 
-{
+[
     {
         B{ 97 98 99 100 }
         B{ 97 98 99 100 101 102 }
@@ -56,7 +56,7 @@ IN: io.streams.peek.tests
         B{ 105 106 107 108 109 110 111 112 }
         B{ 105 106 107 108 109 110 111 112 113 114 }
     }
-} [
+] [
     [
         "abcdefghijklmnopqrstuvwxyz" >byte-array binary <byte-reader> <peek-stream>
         4 over stream-peek ,
@@ -71,7 +71,7 @@ IN: io.streams.peek.tests
     ] { } make
 ] unit-test
 
-{
+[
     {
         "abcd"
         "abcdef"
@@ -83,7 +83,7 @@ IN: io.streams.peek.tests
         "ijklmnop"
         "ijklmnopqr"
     }
-}
+]
 [
     [
         "abcdefghijklmnopqrstuvwxyz" >byte-array ascii <byte-reader> <peek-stream>
@@ -99,7 +99,7 @@ IN: io.streams.peek.tests
     ] { } make
 ] unit-test
 
-{
+[
     {
         B{ 0 1 2 3 }
         B{ 0 1 2 3 4 5 }
@@ -111,7 +111,7 @@ IN: io.streams.peek.tests
         B{ 8 9 10 11 12 13 14 15 }
         B{ 8 9 10 11 12 13 14 15 16 17 }
     }
-}
+]
 [
     [
         [