Subject: | [PATCH] Don’t use CvPADLIST on XSUBs |
Bleadperl now repurposes the field for XSUBs, so your module fails an assertion. See the attachment.
Subject: | open_vL4aQv3t.txt |
diff -rup PadWalker-1.98-r4qSuD-orig/PadWalker.xs PadWalker-1.98-r4qSuD/PadWalker.xs
--- PadWalker-1.98-r4qSuD-orig/PadWalker.xs 2013-10-27 03:11:36.000000000 -0700
+++ PadWalker-1.98-r4qSuD/PadWalker.xs 2014-11-10 21:56:04.000000000 -0800
@@ -538,6 +538,8 @@ CV* cv;
HV* ret = newHV();
HV* ignore = newHV();
PPCODE:
+ if (CvISXSUB(cv))
+ die("PadWalker: cv has no padlist");
padlist_into_hash(CvPADLIST(cv), ret, ignore, 0, CvDEPTH(cv));
SvREFCNT_dec((SV*) ignore);
EXTEND(SP, 1);