]> git.vpit.fr Git - perl/modules/Variable-Magic.git/blobdiff - Magic.xs
Silence an "unused" compiler warning
[perl/modules/Variable-Magic.git] / Magic.xs
index f8a465037948eafdf03535aa19f232a06c9ee786..6136d4b9b7e4283e2ef4963cb5451e7edac63484 100644 (file)
--- a/Magic.xs
+++ b/Magic.xs
@@ -124,7 +124,7 @@ STATIC SV *vmg_clone(pTHX_ SV *sv, tTHX owner) {
 #endif
 
 #ifndef SvREFCNT_inc_simple_void
-# define SvREFCNT_inc_simple_void(sv) SvREFCNT_inc(sv)
+# define SvREFCNT_inc_simple_void(sv) ((void) SvREFCNT_inc(sv))
 #endif
 
 #ifndef mPUSHu