factor: second stab at [ ] [ ] unit-test -> { } [ ] unit-test

[factor.git] / basis / json / writer / writer-tests.factor

diff --git a/basis/json/writer/writer-tests.factor b/basis/json/writer/writer-tests.factor
index d0724d765f86e22db4eb6cb512fe44af91a41bf9..3647649f13d79586c8c949c214c9e5660f6f7a78 100644 (file)
--- a/basis/json/writer/writer-tests.factor
+++ b/basis/json/writer/writer-tests.factor
@@ -17,18 +17,18 @@ IN: json.writer.tests
 
 { """">json"""" } [ \ >json >json ] unit-test
 
-[ { 0.5 } ] [ { 1/2 } >json json> ] unit-test
+{ { 0.5 } } [ { 1/2 } >json json> ] unit-test
 
 TUPLE: person first-name age ;
 
-[ "{\"first-name\":\"David\",\"age\":32}" ]
+{ "{\"first-name\":\"David\",\"age\":32}" }
 [
     f json-friendly-keys?
     [ "David" 32 person boa >json ]
     with-variable
 ] unit-test
 
-[ "{\"first_name\":\"David\",\"age\":32}" ]
+{ "{\"first_name\":\"David\",\"age\":32}" }
 [
     t json-friendly-keys?
     [ "David" 32 person boa >json ]