]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/io/streams/string/string-tests.factor
Revert "factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring...
[factor.git] / basis / io / streams / string / string-tests.factor
index 0385e89670ff2a2e757ebd6150630fb47e563d53..b202dccd752376e04ed37b8aa916ced8fc645a57 100644 (file)
@@ -2,9 +2,9 @@ USING: io.streams.string io kernel arrays namespaces make
 tools.test ;
 IN: io.streams.string.tests
 
-{ "" } [ "" [ contents ] with-string-reader ] unit-test
+[ "" ] [ "" [ contents ] with-string-reader ] unit-test
 
-{ "line 1" CHAR: l }
+[ "line 1" CHAR: l ]
 [
     "line 1\nline 2\nline 3" [ readln read1 ] with-string-reader
 ]
@@ -18,21 +18,21 @@ unit-test
     "\rfoo\r\nbar\rbaz\n" [ lines ] with-string-reader
 ] unit-test
 
-{ f } [ "" [ readln ] with-string-reader ] unit-test
+[ f ] [ "" [ readln ] with-string-reader ] unit-test
 
-{ "xyzzy" } [ [ "xyzzy" write ] with-string-writer ] unit-test
+[ "xyzzy" ] [ [ "xyzzy" write ] with-string-writer ] unit-test
 
-{ "a" } [ "abc" [ 1 read ] with-string-reader ] unit-test
-{ "ab" } [ "abc" [ 2 read ] with-string-reader ] unit-test
-{ "abc" } [ "abc" [ 3 read ] with-string-reader ] unit-test
-{ "abc" } [ "abc" [ 4 read ] with-string-reader ] unit-test
-{ "abc" f } [ "abc" [ 3 read read1 ] with-string-reader ] unit-test
+[ "a" ] [ "abc" [ 1 read ] with-string-reader ] unit-test
+[ "ab" ] [ "abc" [ 2 read ] with-string-reader ] unit-test
+[ "abc" ] [ "abc" [ 3 read ] with-string-reader ] unit-test
+[ "abc" ] [ "abc" [ 4 read ] with-string-reader ] unit-test
+[ "abc" f ] [ "abc" [ 3 read read1 ] with-string-reader ] unit-test
 
-{
+[
     { "It seems " CHAR: J }
     { "obs has lost h" CHAR: i }
     { "s grasp on reality again.\n" f }
-} [
+] [
     "It seems Jobs has lost his grasp on reality again.\n" [
         "J" read-until 2array
         "i" read-until 2array
@@ -43,20 +43,20 @@ unit-test
 { "" CHAR: \r } [ "\r\n" [ "\r" read-until ] with-string-reader ] unit-test
 { f f } [ "" [ "\r" read-until ] with-string-reader ] unit-test
 
-{ "hello" "hi" } [
+[ "hello" "hi" ] [
     "hello\nhi" [ readln 2 read ] with-string-reader
 ] unit-test
 
-{ "hello" "hi" } [
+[ "hello" "hi" ] [
     "hello\r\nhi" [ readln 2 read ] with-string-reader
 ] unit-test
 
-{ "hello" "hi" } [
+[ "hello" "hi" ] [
     "hello\rhi" [ readln 2 read ] with-string-reader
 ] unit-test
 
 ! Issue #70 github
-{ f } [ "" [ 0 read ] with-string-reader ] unit-test
-{ f } [ "" [ 1 read ] with-string-reader ] unit-test
-{ f } [ "" [ readln ] with-string-reader ] unit-test
-{ "\"\"" } [ "\"\"" [ readln ] with-string-reader ] unit-test
+[ f ] [ "" [ 0 read ] with-string-reader ] unit-test
+[ f ] [ "" [ 1 read ] with-string-reader ] unit-test
+[ f ] [ "" [ readln ] with-string-reader ] unit-test
+[ "\"\"" ] [ "\"\"" [ readln ] with-string-reader ] unit-test