diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-26 08:59:47 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-26 08:59:47 +0000 |
| commit | edcf81c065c289db870eda66eec01bdab2c57a10 (patch) | |
| tree | 725e484679ba09a1ad5e459615bbd6bd8375e84b /ext/B | |
| parent | 3f872cb9b86492b28abfc3221567ac8cecfb2724 (diff) | |
| download | perl-edcf81c065c289db870eda66eec01bdab2c57a10.tar.gz | |
setstate stop-gap from Vishal Bhatia
p4raw-id: //depot/perl@3762
Diffstat (limited to 'ext/B')
| -rw-r--r-- | ext/B/B/CC.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/B/B/CC.pm b/ext/B/B/CC.pm index 4affda0014..30882dd48f 100644 --- 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; } } |