X-Git-Url: https://git.dogcows.com/gitweb?a=blobdiff_plain;f=lib%2FFile%2FKDBX%2FXS.pm;fp=lib%2FFile%2FKDBX%2FXS.pm;h=6c8d4bdb1f3d1272456055fe96e24157f7c1b0b0;hb=fdcf309f477e8bd50179b8dad482b16b1598a5a8;hp=57facc917c127cac5ce3d3586e67c6c8b5ab2314;hpb=dd4b4c4ad1d021d3cba6a46291795542cd5def4a;p=chaz%2Fp5-File-KDBX-XS

diff --git a/lib/File/KDBX/XS.pm b/lib/File/KDBX/XS.pm
index 57facc9..6c8d4bd 100644
--- 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