]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/roman/roman-tests.factor
Revert "factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring...
[factor.git] / basis / roman / roman-tests.factor
index b43f513a947d5a9968b4fa347585fd228229b105..c7ab7fafd9177081f2407468dc5ae2bf86184326 100644 (file)
@@ -1,43 +1,43 @@
 USING: arrays kernel math roman roman.private sequences tools.test ;
 
-{ "i" } [ 1 >roman ] unit-test
-{ "ii" } [ 2 >roman ] unit-test
-{ "iii" } [ 3 >roman ] unit-test
-{ "iv" } [ 4 >roman ] unit-test
-{ "v" } [ 5 >roman ] unit-test
-{ "vi" } [ 6 >roman ] unit-test
-{ "vii" } [ 7 >roman ] unit-test
-{ "viii" } [ 8 >roman ] unit-test
-{ "ix" } [ 9 >roman ] unit-test
-{ "x" } [ 10 >roman ] unit-test
-{ "mdclxvi" } [ 1666 >roman ] unit-test
-{ "mmmcdxliv" } [ 3444 >roman ] unit-test
-{ "mmmcmxcix" } [ 3999 >roman ] unit-test
-{ "MMMCMXCIX" } [ 3999 >ROMAN ] unit-test
-{ 3999 } [ 3999 >ROMAN roman> ] unit-test
-{ 1 } [ 1 >roman roman> ] unit-test
-{ 2 } [ 2 >roman roman> ] unit-test
-{ 3 } [ 3 >roman roman> ] unit-test
-{ 4 } [ 4 >roman roman> ] unit-test
-{ 5 } [ 5 >roman roman> ] unit-test
-{ 6 } [ 6 >roman roman> ] unit-test
-{ 7 } [ 7 >roman roman> ] unit-test
-{ 8 } [ 8 >roman roman> ] unit-test
-{ 9 } [ 9 >roman roman> ] unit-test
-{ 10 } [ 10 >roman roman> ] unit-test
-{ 1666 } [ 1666 >roman roman> ] unit-test
-{ 3444 } [ 3444 >roman roman> ] unit-test
-{ 3999 } [ 3999 >roman roman> ] unit-test
+[ "i" ] [ 1 >roman ] unit-test
+[ "ii" ] [ 2 >roman ] unit-test
+[ "iii" ] [ 3 >roman ] unit-test
+[ "iv" ] [ 4 >roman ] unit-test
+[ "v" ] [ 5 >roman ] unit-test
+[ "vi" ] [ 6 >roman ] unit-test
+[ "vii" ] [ 7 >roman ] unit-test
+[ "viii" ] [ 8 >roman ] unit-test
+[ "ix" ] [ 9 >roman ] unit-test
+[ "x" ] [ 10 >roman ] unit-test
+[ "mdclxvi" ] [ 1666 >roman ] unit-test
+[ "mmmcdxliv" ] [ 3444 >roman ] unit-test
+[ "mmmcmxcix" ] [ 3999 >roman ] unit-test
+[ "MMMCMXCIX" ] [ 3999 >ROMAN ] unit-test
+[ 3999 ] [ 3999 >ROMAN roman> ] unit-test
+[ 1 ] [ 1 >roman roman> ] unit-test
+[ 2 ] [ 2 >roman roman> ] unit-test
+[ 3 ] [ 3 >roman roman> ] unit-test
+[ 4 ] [ 4 >roman roman> ] unit-test
+[ 5 ] [ 5 >roman roman> ] unit-test
+[ 6 ] [ 6 >roman roman> ] unit-test
+[ 7 ] [ 7 >roman roman> ] unit-test
+[ 8 ] [ 8 >roman roman> ] unit-test
+[ 9 ] [ 9 >roman roman> ] unit-test
+[ 10 ] [ 10 >roman roman> ] unit-test
+[ 1666 ] [ 1666 >roman roman> ] unit-test
+[ 3444 ] [ 3444 >roman roman> ] unit-test
+[ 3999 ] [ 3999 >roman roman> ] unit-test
 [ 0 >roman ] must-fail
 [ 40000 >roman ] must-fail
-{ "vi" } [ "iii" "iii"  roman+ ] unit-test
-{ "viii" } [ "x" "ii"  roman- ] unit-test
-{ "ix" } [ "iii" "iii"  roman* ] unit-test
-{ "i" } [ "iii" "ii" roman/i ] unit-test
-{ "i" "ii" } [ "v" "iii"  roman/mod ] unit-test
+[ "vi" ] [ "iii" "iii"  roman+ ] unit-test
+[ "viii" ] [ "x" "ii"  roman- ] unit-test
+[ "ix" ] [ "iii" "iii"  roman* ] unit-test
+[ "i" ] [ "iii" "ii" roman/i ] unit-test
+[ "i" "ii" ] [ "v" "iii"  roman/mod ] unit-test
 [ "iii" "iii"  roman- ] must-fail
 
-{ 30 } [ ROMAN: xxx ] unit-test
+[ 30 ] [ ROMAN: xxx ] unit-test
 
 [ roman+ ] must-infer
 [ roman- ] must-infer