Change 34656 by [EMAIL PROTECTED] on 2008/10/30 08:26:54
Integrate:
[ 34644]
Integrate:
[ 34600]
No, it's not a const SV* if we subsequently call
SvREFCNT_dec() on it.
Affected files ...
... //depot/maint-5.8/perl/pad.c#70 integrate
Differences ...
==== //depot/maint-5.8/perl/pad.c#70 (text) ====
Index: perl/pad.c
--- perl/pad.c#69~34633~ 2008-10-29 01:22:26.000000000 -0700
+++ perl/pad.c 2008-10-30 01:26:54.000000000 -0700
@@ -294,7 +294,7 @@
ix = AvFILLp(padlist);
while (ix >= 0) {
- const SV* const sv = AvARRAY(padlist)[ix--];
+ SV* const sv = AvARRAY(padlist)[ix--];
if (sv) {
if (sv == (SV*)PL_comppad_name)
PL_comppad_name = NULL;
End of Patch.
