1 files changed, 15 insertions, 0 deletions
diff --git a/t/00_load.t b/t/00_load.t
new file mode 100644
index 0000000..916c826
--- /dev/null
+++ b/t/00_load.t
@@ -0,0 +1,15 @@
+use Test::More;
+use strict;
+BEGIN { plan tests => 5 };
+
+BEGIN { $ENV{PERL_JSON_BACKEND} = "JSON::backportPP"; }
+
+BEGIN {
+    use_ok('JSON');
+}
+
+ok( exists $INC{ 'JSON/backportPP.pm' }, 'load backportPP' );
+ok( ! exists $INC{ 'JSON/PP.pm' }, q/didn't load PP/ );
+
+is( JSON->backend, 'JSON::PP' );
+ok( JSON->backend->is_pp );