]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/ui/gadgets/paragraphs/paragraphs-tests.factor
factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring tool!
[factor.git] / basis / ui / gadgets / paragraphs / paragraphs-tests.factor
index 44c0ca567738e2f173c35e17adaa2afe080f0825..20ab000f20003d95cd609235c5ec985ee35d65ac 100644 (file)
@@ -17,19 +17,19 @@ INSTANCE: fake-break word-break
 <gadget> { 50 20 } >>dim dup "c" set add-gadget
 "p" set
 
-[ { 4 1 } ] [ "p" get wrap-paragraph [ words>> length ] map ] unit-test
+{ { 4 1 } } [ "p" get wrap-paragraph [ words>> length ] map ] unit-test
 
-[ { 85 50 } ] [ "p" get pref-dim ] unit-test
+{ { 85 50 } } [ "p" get pref-dim ] unit-test
 
-[ ] [ "p" get prefer ] unit-test
+{ } [ "p" get prefer ] unit-test
 
-[ ] [ "p" get layout ] unit-test
+{ } [ "p" get layout ] unit-test
 
-[ { 0 0 } ] [ "a" get loc>> ] unit-test
+{ { 0 0 } } [ "a" get loc>> ] unit-test
 
-[ { 45 7 } ] [ "b" get loc>> ] unit-test
+{ { 45 7 } } [ "b" get loc>> ] unit-test
 
-[ { 0 30 } ] [ "c" get loc>> ] unit-test
+{ { 0 30 } } [ "c" get loc>> ] unit-test
 
 100 <paragraph>
 15 15 { 40 30 } <baseline-gadget> dup "a" set add-gadget
@@ -39,14 +39,14 @@ INSTANCE: fake-break word-break
 20 20 { 40 30 } <baseline-gadget> dup "c" set add-gadget
 "p" set
 
-[ { 85 65 } ] [ "p" get pref-dim ] unit-test
+{ { 85 65 } } [ "p" get pref-dim ] unit-test
 
-[ ] [ "p" get prefer ] unit-test
+{ } [ "p" get prefer ] unit-test
 
-[ ] [ "p" get layout ] unit-test
+{ } [ "p" get layout ] unit-test
 
-[ { 0 0 } ] [ "a" get loc>> ] unit-test
+{ { 0 0 } } [ "a" get loc>> ] unit-test
 
-[ { 45 5 } ] [ "b" get loc>> ] unit-test
+{ { 45 5 } } [ "b" get loc>> ] unit-test
 
-[ { 0 35 } ] [ "c" get loc>> ] unit-test
+{ { 0 35 } } [ "c" get loc>> ] unit-test