]> git.vpit.fr Git - perl/modules/re-engine-Plugin.git/blobdiff - Plugin.xs
Silence a const warning
[perl/modules/re-engine-Plugin.git] / Plugin.xs
index 2aeb2b951268e4858836f8f75c1a3292602c0992..544fab8aa070cfc79b1d00ae2f6d33a84116f2eb 100644 (file)
--- a/Plugin.xs
+++ b/Plugin.xs
@@ -283,7 +283,7 @@ Plugin_numbered_buff_STORE(pTHX_ REGEXP * const RX, const I32 paren,
         PUSHMARK(SP);
         XPUSHs(rx->pprivate);
         XPUSHs(sv_2mortal(newSViv(paren)));
-        XPUSHs(SvREFCNT_inc(value));
+        XPUSHs(SvREFCNT_inc((SV *) value));
         PUTBACK;
 
         call_sv(callback, G_DISCARD);