--- t/19_incr.old 2008-06-22 08:05:49.000000000 -0400 +++ t/19_incr.t 2013-03-22 16:24:42.000000000 -0400 @@ -24,10 +24,10 @@ } } -splitter +JSON::XS->new , ' ["x\\"","\\u1000\\\\n\\nx",1,{"\\\\" :5 , "": "x"}]'; -splitter +JSON::XS->new , '[ "x\\"","\\u1000\\\\n\\nx" , 1,{"\\\\ " :5 , "": " x"} ] '; -splitter +JSON::XS->new->allow_nonref, '"test"'; -splitter +JSON::XS->new->allow_nonref, ' "5" '; +splitter +JSON::XS->new->canonical , ' ["x\\"","\\u1000\\\\n\\nx",1,{"\\\\" :5 , "": "x"}]'; +splitter +JSON::XS->new->canonical , '[ "x\\"","\\u1000\\\\n\\nx" , 1,{"\\\\ " :5 , "": " x"} ] '; +splitter +JSON::XS->new->allow_nonref->canonical, '"test"'; +splitter +JSON::XS->new->allow_nonref->canonical, ' "5" '; { my $text = '[5],{"":1} , [ 1,2, 3], {"3":null}';