]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/literals/literals-tests.factor
Revert "factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring...
[factor.git] / basis / literals / literals-tests.factor
index 2fb8798dcbf14c2ef6d15fc689cc19748974d0c3..b6c76e86ba99cd94db024cfe012065eb5d363460 100644 (file)
@@ -8,21 +8,21 @@ IN: literals.tests
 : five ( -- a ) 5 ;
 : seven-eleven ( -- b c ) 7 11 ;
 
-{ { 5 } } [ { $ five } ] unit-test
-{ { 7 11 } } [ { $ seven-eleven } ] unit-test
-{ { 6 6 6 } } [ { $ six-six-six } ] unit-test
+[ { 5 } ] [ { $ five } ] unit-test
+[ { 7 11 } ] [ { $ seven-eleven } ] unit-test
+[ { 6 6 6 } ] [ { $ six-six-six } ] unit-test
 
-{ { 6 6 6 7 } } [ { $ six-six-six 7 } ] unit-test
+[ { 6 6 6 7 } ] [ { $ six-six-six 7 } ] unit-test
 
-{ { 8 8 8 } } [ { $[ six-six-six [ 2 + ] tri@ ] } ] unit-test
+[ { 8 8 8 } ] [ { $[ six-six-six [ 2 + ] tri@ ] } ] unit-test
 
-{ { 0.5 2.0 } } [ { $[ 1.0 2.0 / ] 2.0 } ] unit-test
+[ { 0.5 2.0 } ] [ { $[ 1.0 2.0 / ] 2.0 } ] unit-test
 
-{ { 1.0 { 0.5 1.5 } 4.0 } } [ { 1.0 { $[ 1.0 2.0 / ] 1.5 } $[ 2.0 2.0 * ] } ] unit-test
+[ { 1.0 { 0.5 1.5 } 4.0 } ] [ { 1.0 { $[ 1.0 2.0 / ] 1.5 } $[ 2.0 2.0 * ] } ] unit-test
 
 CONSTANT: constant-a 3
 
-{ { 3 10 "ftw" } } [ ${ constant-a 10 "ftw" } ] unit-test
+[ { 3 10 "ftw" } ] [ ${ constant-a 10 "ftw" } ] unit-test
 { { 4 } } [ ${ 1 constant-a + } ] unit-test
 { { 3 } } [ ${ 1 2 + } ] unit-test
 { { 1 2 \ + } } [ ${ 1 2 \ + } ] unit-test
@@ -31,7 +31,7 @@ CONSTANT: constant-a 3
 
 : sixty-nine ( -- a b ) 6 9 ;
 
-{ { 6 9 } } [ ${ sixty-nine } ] unit-test
+[ { 6 9 } ] [ ${ sixty-nine } ] unit-test
 
 CONSTANT: a 1
 CONSTANT: b 2
@@ -40,8 +40,8 @@ ALIAS: d c
 
 CONSTANT: foo flags{ a b d }
 
-{ 3 } [ foo ] unit-test
-{ 3 } [ flags{ a b d } ] unit-test
+[ 3 ] [ foo ] unit-test
+[ 3 ] [ flags{ a b d } ] unit-test
 \ foo def>> must-infer
 
-{ 1 } [ flags{ 1 } ] unit-test
+[ 1 ] [ flags{ 1 } ] unit-test