Change 34962 by [EMAIL PROTECTED] on 2008/12/01 09:09:13
Integrate:
[ 34954]
Proposed fix for -T -d:NYTProf regression. Probably this is a "missing"
part of change 24943.
[ 34955]
This feels like a more robust location than that of change 34954.
Affected files ...
... //depot/maint-5.10/perl/scope.c#7 integrate
Differences ...
==== //depot/maint-5.10/perl/scope.c#7 (text) ====
Index: perl/scope.c
--- perl/scope.c#6~34599~ 2008-10-26 14:44:48.000000000 -0700
+++ perl/scope.c 2008-12-01 01:09:13.000000000 -0800
@@ -619,6 +619,8 @@
if (base < -1)
Perl_croak(aTHX_ "panic: corrupt saved stack index");
while (PL_savestack_ix > base) {
+ TAINT_NOT;
+
switch (SSPOPINT) {
case SAVEt_ITEM: /* normal string */
value = (SV*)SSPOPPTR;
End of Patch.
