do { require ... } will explode if the require failed - need an eval here!
[p5sagit/JSON-MaybeXS.git] / t / preload_xs.t
1 use strict;
2 use warnings FATAL => 'all';
3 use if !eval { require JSON::XS; 1; }, 'Test::More', skip_all => 'No JSON::XS';
4 use Test::More;
5 use JSON::MaybeXS;
6
7 is( JSON, 'JSON::XS', 'Correct JSON class' );
8
9 is( \&encode_json, \&JSON::XS::encode_json, 'Correct encode_json function' );
10 is( \&decode_json, \&JSON::XS::decode_json, 'Correct encode_json function' );
11
12 done_testing;