]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/graphs/graphs-tests.factor
Revert "factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring...
[factor.git] / basis / graphs / graphs-tests.factor
index 9e06078535a75f8c99ab86fcefc1630ee79cd2bd..992c5f28f2c767aa84512477b839c9014aaff494 100644 (file)
@@ -3,9 +3,9 @@ USING: graphs tools.test namespaces kernel sorting assocs ;
 H{ } "g" set
 { 1 2 3 } "v" set
 
-{ } [ "v" dup get "g" get add-vertex ] unit-test
+[ ] [ "v" dup get "g" get add-vertex ] unit-test
 
-{ { "v" } } [ 1 "g" get at keys ] unit-test
+[ { "v" } ] [ 1 "g" get at keys ] unit-test
 
 H{
     { 1 H{ { 1 1 } { 2 2 } } }
@@ -13,38 +13,38 @@ H{
     { 4 H{ { 4 4 } { 5 5 } } }
 } "g" set
 
-{ { 2 3 4 5 } } [
+[ { 2 3 4 5 } ] [
     2 [ "g" get at ] closure keys natural-sort
 ] unit-test
 
 H{ } "g" set
 
-{ } [
+[ ] [
     "mary"
     H{ { "billy" "one" } { "joey" "two" } }
     "g" get add-vertex*
 ] unit-test
 
-{ H{ { "mary" "one" } } } [
+[ H{ { "mary" "one" } } ] [
     "billy" "g" get at
 ] unit-test
 
-{ } [
+[ ] [
     "liz"
     H{ { "billy" "four" } { "fred" "three" } }
     "g" get add-vertex*
 ] unit-test
 
-{ H{ { "mary" "one" } { "liz" "four" } } } [
+[ H{ { "mary" "one" } { "liz" "four" } } ] [
     "billy" "g" get at
 ] unit-test
 
-{ } [
+[ ] [
     "mary"
     H{ { "billy" "one" } { "joey" "two" } }
     "g" get remove-vertex*
 ] unit-test
 
-{ H{ { "liz" "four" } } } [
+[ H{ { "liz" "four" } } ] [
     "billy" "g" get at
 ] unit-test