factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring tool!

[factor.git] / extra / euler / b-rep / triangulation / triangulation-tests.factor

diff --git a/extra/euler/b-rep/triangulation/triangulation-tests.factor b/extra/euler/b-rep/triangulation/triangulation-tests.factor
index 14c2e6cbcd9c24b465575f4e0c894d0214b61b14..bcc38b2185d61e9a4ecd7e32070796dbdb6dc344 100644 (file)
--- a/extra/euler/b-rep/triangulation/triangulation-tests.factor
+++ b/extra/euler/b-rep/triangulation/triangulation-tests.factor
@@ -6,7 +6,7 @@ IN: euler.b-rep.triangulation.tests
 : triangle-vx-positions ( triangles -- positions )
     [ [ position>> ] { } map-as ] { } map-as ;
 
-[
+{
     {
         {
             double-4{ 1.0 1.0 -1.0 0.0 }
@@ -19,10 +19,10 @@ IN: euler.b-rep.triangulation.tests
             double-4{ 1.0 -1.0 -1.0 0.0 }
         }
     }
-] [ valid-cube-b-rep faces>> first triangulate-face triangle-vx-positions ] unit-test
+} [ valid-cube-b-rep faces>> first triangulate-face triangle-vx-positions ] unit-test
 
-[ { } ] [ degenerate-incomplete-face faces>> first triangulate-face triangle-vx-positions ] unit-test
-[ {
+{ { } } [ degenerate-incomplete-face faces>> first triangulate-face triangle-vx-positions ] unit-test
+{ {
     {
         double-4{ 1.0 1.0 0.0 0.0 }
         double-4{ -1.0 -1.0 0.0 0.0 }
@@ -33,9 +33,9 @@ IN: euler.b-rep.triangulation.tests
         double-4{ 1.0 1.0 0.0 0.0 }
         double-4{ 1.0 -1.0 0.0 0.0 }
     }
-} ] [ partially-degenerate-second-face faces>> second triangulate-face triangle-vx-positions ] unit-test
+} } [ partially-degenerate-second-face faces>> second triangulate-face triangle-vx-positions ] unit-test
 
-[
+{
     {
         {
             double-4{ -1.0 1.0 0.0 0.0 }
@@ -78,7 +78,7 @@ IN: euler.b-rep.triangulation.tests
             double-4{ 1.0 1.0 0.0 0.0 }
         }
     }
-] [
+} [
     [ "vocab:gml/examples/torus.gml" run-gml-file ] make-gml nip
     faces>> first triangulate-face triangle-vx-positions
 ] unit-test