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

[factor.git] / extra / infix / parser / parser-tests.factor

diff --git a/extra/infix/parser/parser-tests.factor b/extra/infix/parser/parser-tests.factor
index 95c0627e41b23f603d284834a20cb183b4199d79..24bb3acad99cd4c21746816eba3cc5ae587c7048 100644 (file)
--- a/extra/infix/parser/parser-tests.factor
+++ b/extra/infix/parser/parser-tests.factor
@@ -3,10 +3,10 @@
 USING: infix.ast infix.parser infix.tokenizer tools.test ;
 IN: infix.parser.tests
 
-[ T{ ast-number { value 1 } } ] [ "1" build-infix-ast ] unit-test
-[ T{ ast-negation f T{ ast-number { value 1 } } } ]
+{ T{ ast-number { value 1 } } } [ "1" build-infix-ast ] unit-test
+{ T{ ast-negation f T{ ast-number { value 1 } } } }
 [ "-1" build-infix-ast ] unit-test
-[ T{ ast-op
+{ T{ ast-op
     { left
         T{ ast-op
             { left T{ ast-number { value 1 } } }
@@ -16,9 +16,9 @@ IN: infix.parser.tests
     }
     { right T{ ast-number { value 4 } } }
     { op "+" }
-} ] [ "1+2+4" build-infix-ast ] unit-test
+} } [ "1+2+4" build-infix-ast ] unit-test
 
-[ T{ ast-op
+{ T{ ast-op
     { left T{ ast-number { value 1 } } }
     { right
         T{ ast-op
@@ -28,18 +28,18 @@ IN: infix.parser.tests
         }
     }
     { op "+" }
-} ] [ "1+2*3" build-infix-ast ] unit-test
+} } [ "1+2*3" build-infix-ast ] unit-test
 
-[ T{ ast-op
+{ T{ ast-op
     { left T{ ast-number { value 1 } } }
     { right T{ ast-number { value 2 } } }
     { op "+" }
-} ] [ "(1+2)" build-infix-ast ] unit-test
+} } [ "(1+2)" build-infix-ast ] unit-test
 
-[ T{ ast-local { name "foo" } } ] [ "foo" build-infix-ast ] unit-test
+{ T{ ast-local { name "foo" } } } [ "foo" build-infix-ast ] unit-test
 [ "-" build-infix-ast ] must-fail
 
-[ T{ ast-function
+{ T{ ast-function
     { name "foo" }
     { arguments
         V{
@@ -55,9 +55,9 @@ IN: infix.parser.tests
             }
         }
     }
-} ] [ "foo (1+ 2,2%3)  " build-infix-ast ] unit-test
+} } [ "foo (1+ 2,2%3)  " build-infix-ast ] unit-test
 
-[ T{ ast-op
+{ T{ ast-op
     { left
         T{ ast-op
             { left
@@ -99,9 +99,9 @@ IN: infix.parser.tests
     }
     { right T{ ast-number { value 2 } } }
     { op "/" }
-} ] [ "(bar() + baz[2/ 3+4 ] )/2" build-infix-ast ] unit-test
+} } [ "(bar() + baz[2/ 3+4 ] )/2" build-infix-ast ] unit-test
 
-[ T{ ast-op
+{ T{ ast-op
     { left T{ ast-number { value 1 } } }
     { right
         T{ ast-op
@@ -111,9 +111,9 @@ IN: infix.parser.tests
         }
     }
     { op "+" }
-} ] [ "1\n+\n2\r/\t3" build-infix-ast ] unit-test
+} } [ "1\n+\n2\r/\t3" build-infix-ast ] unit-test
 
-[ T{ ast-negation
+{ T{ ast-negation
     { term
         T{ ast-function
             { name "foo" }
@@ -127,9 +127,9 @@ IN: infix.parser.tests
             }
         }
     }
-} ] [ "-foo(+2,-3)" build-infix-ast ] unit-test
+} } [ "-foo(+2,-3)" build-infix-ast ] unit-test
 
-[ T{ ast-array
+{ T{ ast-array
     { name "arr" }
     { index
         T{ ast-op
@@ -167,7 +167,7 @@ IN: infix.parser.tests
             { op "/" }
         }
     }
-} ] [ "+arr[-(foo(2)+-1)/3]" build-infix-ast ] unit-test
+} } [ "+arr[-(foo(2)+-1)/3]" build-infix-ast ] unit-test
 
 [ "foo bar baz" build-infix-ast ] must-fail
 [ "1+2/4+" build-infix-ast ] must-fail