t/pp.t

   1 use strict;
   2 use warnings;
   3
   4 use Test::Without::Module 'Cpanel::JSON::XS', 'JSON::XS';
   5 use if !eval { require JSON::PP; 1; }, 'Test::More', skip_all => 'No JSON::PP';
   6 use Test::More;
   7 use JSON::MaybeXS;
   8
   9 diag 'Using JSON::PP ', JSON::PP->VERSION;
  10
  11 is(JSON, 'JSON::PP', 'Correct JSON class');
  12
  13 is(
  14   \&encode_json, \&JSON::PP::encode_json,
  15   'Correct encode_json function'
  16 );
  17
  18 is(
  19   \&decode_json, \&JSON::PP::decode_json,
  20   'Correct encode_json function'
  21 );
  22
  23 require 't/lib/is_bool.pm';
  24
  25 done_testing;