move functions to the File::KDBX::XS module

[chaz/p5-File-KDBX-XS] / lib / File / KDBX / XS.pm

diff --git a/lib/File/KDBX/XS.pm b/lib/File/KDBX/XS.pm
index 57facc917c127cac5ce3d3586e67c6c8b5ab2314..6c8d4bdb1f3d1272456055fe96e24157f7c1b0b0 100644 (file)
--- a/lib/File/KDBX/XS.pm
+++ b/lib/File/KDBX/XS.pm
@@ -4,10 +4,16 @@ package File::KDBX::XS;
 use warnings;
 use strict;
 
+use Exporter qw(import);
 use XSLoader;
 
 our $VERSION = '999.999'; # VERSION
 
+our @EXPORT_OK = qw(
+    CowREFCNT
+    kdf_aes_transform_half
+);
+
 XSLoader::load(__PACKAGE__, $VERSION);
 
 1;
@@ -38,4 +44,11 @@ bundled according to their own licensing terms (which are also permissive).
 
 =end HTML
 
+=func CowREFCNT
+
+Get the copy-on-write (COW) reference count of a scalar, or C<undef> if the perl does not support scalar COW
+or if the scalar is not COW.
+
+See also L<B::COW/"cowrefcnt( PV )">.
+
 =cut