Change 34644 by [EMAIL PROTECTED] on 2008/10/29 21:18:32
Integrate:
[ 34600]
No, it's not a const SV* if we subsequently call
SvREFCNT_dec() on it.
Affected files ...
... //depot/maint-5.10/perl/pad.c#5 integrate
Differences ...
==== //depot/maint-5.10/perl/pad.c#5 (text) ====
Index: perl/pad.c
--- perl/pad.c#4~34599~ 2008-10-26 14:44:48.000000000 -0700
+++ perl/pad.c 2008-10-29 14:18:32.000000000 -0700
@@ -312,7 +312,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.
