setstate stop-gap from Vishal Bhatia

p4raw-id: //depot/perl@3762

diff --git a/ext/B/B/CC.pm b/ext/B/B/CC.pm
index 4affda0..30882dd 100644 (file)
--- a/ext/B/B/CC.pm
+++ b/ext/B/B/CC.pm
@@ -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;
     }
 }