ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/JSON-XS/t/06_pc_pretty.t
(Generate patch)

Comparing JSON-XS/t/06_pc_pretty.t (file contents):
Revision 1.1 by root, Fri Mar 23 15:10:56 2007 UTC vs.
Revision 1.2 by root, Tue Sep 8 00:37:43 2009 UTC

22 10, 22 10,
23 "hoge", 23 "hoge",
24 { 24 {
25 "foo" : "bar" 25 "foo" : "bar"
26 } 26 }
27]
27]|); 28|);
28 29
29$obj = { foo => [ {a=>"b"}, 0, 1, 2 ] }; 30$obj = { foo => [ {a=>"b"}, 0, 1, 2 ] };
30$pc->pretty(0); 31$pc->pretty(0);
31$js = $pc->encode($obj); 32$js = $pc->encode($obj);
32is($js,q|{"foo":[{"a":"b"},0,1,2]}|); 33is($js,q|{"foo":[{"a":"b"},0,1,2]}|);
42 }, 43 },
43 0, 44 0,
44 1, 45 1,
45 2 46 2
46 ] 47 ]
48}
47}|); 49|);
48 50
49$obj = { foo => [ {a=>"b"}, 0, 1, 2 ] }; 51$obj = { foo => [ {a=>"b"}, 0, 1, 2 ] };
50$pc->pretty(0); 52$pc->pretty(0);
51$js = $pc->encode($obj); 53$js = $pc->encode($obj);
52is($js,q|{"foo":[{"a":"b"},0,1,2]}|); 54is($js,q|{"foo":[{"a":"b"},0,1,2]}|);
53 55
54 56
55$obj = {foo => "bar"}; 57$obj = {foo => "bar"};
56$pc->indent(1); 58$pc->indent(1);
57is($pc->encode($obj), qq|{\n "foo":"bar"\n}|, "nospace"); 59is($pc->encode($obj), qq|{\n "foo":"bar"\n}\n|, "nospace");
58$pc->space_after(1); 60$pc->space_after(1);
59is($pc->encode($obj), qq|{\n "foo": "bar"\n}|, "after"); 61is($pc->encode($obj), qq|{\n "foo": "bar"\n}\n|, "after");
60$pc->space_before(1); 62$pc->space_before(1);
61is($pc->encode($obj), qq|{\n "foo" : "bar"\n}|, "both"); 63is($pc->encode($obj), qq|{\n "foo" : "bar"\n}\n|, "both");
62$pc->space_after(0); 64$pc->space_after(0);
63is($pc->encode($obj), qq|{\n "foo" :"bar"\n}|, "before"); 65is($pc->encode($obj), qq|{\n "foo" :"bar"\n}\n|, "before");
64 66

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines