setstate stop-gap from Vishal Bhatia
Gurusamy Sarathy [Mon, 26 Jul 1999 08:59:47 +0000 (08:59 +0000)]
p4raw-id: //depot/perl@3762

ext/B/B/CC.pm

index 4affda0..30882dd 100644 (file)
@@ -54,7 +54,7 @@ my %ignore_op;                # Hash of ops which do nothing except returning op_next
 my %need_curcop;       # Hash of ops which need PL_curcop
 
 BEGIN {
-    foreach (qw(pp_scalar pp_regcmaybe pp_lineseq pp_scope pp_null)) {
+    foreach (qw(pp_setstate pp_scalar pp_regcmaybe pp_lineseq pp_scope pp_null)) {
        $ignore_op{$_} = 1;
     }
 }