]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/pair-rocket/pair-rocket-tests.factor
factor: second stab at [ ] [ ] unit-test -> { } [ ] unit-test
[factor.git] / extra / pair-rocket / pair-rocket-tests.factor
index 695e50ea7e43ab567abaad9abe2d5bdd735e98f9..d8d5a24602416b07f045030bf15a93110de7c15b 100644 (file)
@@ -2,9 +2,9 @@
 USING: kernel pair-rocket tools.test ;
 IN: pair-rocket.tests
 
-[ { "a" 1 } ] [ "a" => 1 ] unit-test
-[ { { "a" } { 1 } } ] [ { "a" } => { 1 } ] unit-test
-[ { drop 1 } ] [ drop => 1 ] unit-test
+{ { "a" 1 } } [ "a" => 1 ] unit-test
+{ { { "a" } { 1 } } } [ { "a" } => { 1 } ] unit-test
+{ { drop 1 } } [ drop => 1 ] unit-test
 
-[ H{ { "zippity" 5 } { "doo" 2 } { "dah" 7 } } ]
+{ H{ { "zippity" 5 } { "doo" 2 } { "dah" 7 } } }
 [ H{ "zippity" => 5 "doo" => 2 "dah" => 7 } ] unit-test