Adjust json.reader unit tests a bit

diff --git a/extra/json/reader/reader-tests.factor b/extra/json/reader/reader-tests.factor
index e8dbc2eaa7e523b2c193647a876aefc7192f8109..4b7bd56f01c99e08f5b57266e499f2aec6b5e270 100644 (file)
--- a/extra/json/reader/reader-tests.factor
+++ b/extra/json/reader/reader-tests.factor
@@ -5,7 +5,6 @@ IN: json.reader.tests
 { t } [ "true" json> ] unit-test
 { json-null } [ "null" json> ] unit-test
 { 0 } [ "0" json> ] unit-test
-{ 0 } [ "0000" json> ] unit-test
 { 102 } [ "102" json> ] unit-test
 { -102 } [ "-102" json> ] unit-test
 { 102 } [ "+102" json> ] unit-test
@@ -15,12 +14,13 @@ IN: json.reader.tests
 { -10250 } [ "-102.5e2" json> ] unit-test
 { -10250 } [ "-102.5E+2" json> ] unit-test
 { 10.25 } [ "1025e-2" json> ] unit-test
+{ 0.125 } [ "0.125" json> ] unit-test
+{ -0.125 } [ "-0.125" json> ] unit-test
 
-{ "fuzzy  pickles" } [ <" "fuzzy  pickles" "> json> ] unit-test
+{ " fuzzy  pickles " } [ <" " fuzzy  pickles " "> json> ] unit-test
 { "while 1:\n\tpass" } [ <" "while 1:\n\tpass" "> json> ] unit-test
 { 8 9 10 12 13 34 47 92 } >string 1array [ <" "\b\t\n\f\r\"\/\\" "> json> ] unit-test
 { HEX: abcd } >string 1array [ <" "\uaBCd" "> json> ] unit-test
-{ "\"scare\" quotes" } [ <" "\"scare\" quotes" "> json> ] unit-test
 
 { { 1 "two" 3.0 } } [ <" [1, "two", 3.0] "> json> ] unit-test
 { H{ { "US$" 1.0 } { "EU€" 1.5 } } } [ <" { "US$":1.00, "EU\u20AC":1.50 } "> json> ] unit-test