X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Name.xs;fp=Name.xs;h=4957c3592ca0c21bcdec407524495f38cc22be9c;hb=8b9e23628bac27e5e8a4b800a441d9d16e5ba71a;hp=c2c9b3c0f0cd7fea5ec744902c0e0f062f83652c;hpb=d324c819aaeede99fd16eca4bdb8fd853beacb7d;p=p5sagit%2FSub-Name.git

diff --git a/Name.xs b/Name.xs
index c2c9b3c..4957c35 100644
--- a/Name.xs
+++ b/Name.xs
@@ -11,7 +11,7 @@
 #define NEED_newSVpvn_flags
 #define NEED_gv_fetchpvn_flags
 #define NEED_sv_catpvn_flags
-#define NEED_croak_xs_usage
+#define NEED_croak_xs_usage     /* running `perl ppport.h Name.xs` suggests removing this, but don't! see RT#125158 */
 #include "ppport.h"
 
 static MGVTBL subname_vtbl;