t/preload_xs.t

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