20 lines
679 B
Factor
20 lines
679 B
Factor
USING: json.writer tools.test multiline json.reader json ;
|
|
IN: json.writer.tests
|
|
|
|
{ "false" } [ f >json ] unit-test
|
|
{ "true" } [ t >json ] unit-test
|
|
{ "null" } [ json-null >json ] unit-test
|
|
{ "0" } [ 0 >json ] unit-test
|
|
{ "102" } [ 102 >json ] unit-test
|
|
{ "-102" } [ -102 >json ] unit-test
|
|
{ "102.0" } [ 102.0 >json ] unit-test
|
|
{ "102.5" } [ 102.5 >json ] unit-test
|
|
|
|
{ "[1,\"two\",3.0]" } [ { 1 "two" 3.0 } >json ] unit-test
|
|
{ <" {"US$":1.0,"EU€":1.5}"> } [ H{ { "US$" 1.0 } { "EU€" 1.5 } } >json ] unit-test
|
|
|
|
! Random symbols are written simply as strings
|
|
SYMBOL: testSymbol
|
|
{ <" "testSymbol""> } [ testSymbol >json ] unit-test
|
|
|
|
[ { 0.5 } ] [ { 1/2 } >json json> ] unit-test |