1# Before `make install' is performed this script should be runnable with
2# `make test'. After `make install' it should work as `perl 1.t'
3
4#########################
5
6use Test::More;
7BEGIN { plan tests => 6 };
8use JSON;
9ok(1); # If we made it this far, we're ok.
10
11#########################
12
13# Insert your test code below, the Test::More module is use()ed here so read
14# its man page ( perldoc Test::More ) for help writing this test script.
15
16my $parser = new JSON::Parser;
17my $conv   = new JSON::Converter;
18
19isa_ok($parser,'JSON::Parser');
20isa_ok($conv,'JSON::Converter');
21
22ok($parser->parse('{}'));
23ok($parser->parse('[]'));
24
25ok(jsonToObj(qq|//   \n ["a","b", /*  */ {},123, null, true, false ]|));
26