1 files changed, 65 insertions, 0 deletions
diff --git a/t/release-pp-37-exports.t b/t/release-pp-37-exports.t
new file mode 100644
index 0000000..607aefc
--- /dev/null
+++ b/t/release-pp-37-exports.t
@@ -0,0 +1,65 @@
+
+
+use Test::More;
+
+BEGIN {
+    unless ( $ENV{RELEASE_TESTING} ) {
+        plan skip_all => 'these tests are for release testing';
+    }
+
+    $ENV{PV_TEST_PERL} = 1;
+}
+
+use strict;
+use warnings;
+
+use Test::More;
+use Params::Validate ();
+
+my @types = qw(
+    SCALAR
+    ARRAYREF
+    HASHREF
+    CODEREF
+    GLOB
+    GLOBREF
+    SCALARREF
+    HANDLE
+    BOOLEAN
+    UNDEF
+    OBJECT
+);
+
+my @subs = qw(
+    validate
+    validate_pos
+    validation_options
+    validate_with
+);
+
+is_deeply(
+    [ sort @Params::Validate::EXPORT_OK ],
+    [ sort @types, @subs, 'set_options' ],
+    '@EXPORT_OK'
+);
+
+is_deeply(
+    [ sort keys %Params::Validate::EXPORT_TAGS ],
+    [qw( all types )],
+    'keys %EXPORT_TAGS'
+);
+
+is_deeply(
+    [ sort @{ $Params::Validate::EXPORT_TAGS{all} } ],
+    [ sort @types, @subs ],
+    '$EXPORT_TAGS{all}',
+);
+
+is_deeply(
+    [ sort @{ $Params::Validate::EXPORT_TAGS{types} } ],
+    [ sort @types ],
+    '$EXPORT_TAGS{types}',
+);
+
+done_testing();
+