X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=handy.h;h=32239b9ee3755d78fcd0bfd3a1ec52cfa9c0d156;hb=ea726b52599b52cf534201a46ec3455418c9eb8e;hp=446df5b2c9d6d687b51ad5ee0eb096411f1441ed;hpb=126f53f392147cb95f8643714b33fe373747680a;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/handy.h b/handy.h
index 446df5b..32239b9 100644
--- a/handy.h
+++ b/handy.h
@@ -55,6 +55,7 @@ Null SV pointer. (No longer available when C<PERL_CORE> is defined.)
 #endif
 
 #define MUTABLE_AV(p)	((AV *)MUTABLE_PTR(p))
+#define MUTABLE_CV(p)	((CV *)MUTABLE_PTR(p))
 #define MUTABLE_HV(p)	((HV *)MUTABLE_PTR(p))
 #define MUTABLE_SV(p)	((SV *)MUTABLE_PTR(p))