diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2011-08-15 17:52:10 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-08-15 20:27:02 -0700 |
| commit | 8367b68105921d0def67524bf5fc0c65b1e402d4 (patch) | |
| tree | f0ccfa070765e87cf3c6815e09956883b0a5a109 /ext/B | |
| parent | d26376f0cba86f87a4770b29227457e5c2b4a1db (diff) | |
| download | perl-8367b68105921d0def67524bf5fc0c65b1e402d4.tar.gz | |
Remove OPpENTERSUB_NOMOD from B::Concise
Diffstat (limited to 'ext/B')
| -rw-r--r-- | ext/B/B/Concise.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/B/B/Concise.pm b/ext/B/B/Concise.pm index f427fe6041..3849e17d29 100644 --- a/ext/B/B/Concise.pm +++ b/ext/B/B/Concise.pm @@ -14,7 +14,7 @@ use warnings; # uses #3 and #4, since warnings uses Carp use Exporter (); # use #5 -our $VERSION = "0.84"; +our $VERSION = "0.85"; our @ISA = qw(Exporter); our @EXPORT_OK = qw( set_style set_style_standard add_callback concise_subref concise_cv concise_main @@ -611,7 +611,7 @@ $priv{$_}{4} = "DREFed" for (qw(rv2sv rv2av rv2hv)); @{$priv{$_}}{32,64,96} = ("DREFAV", "DREFHV", "DREFSV") for (qw(rv2gv rv2sv padsv aelem helem)); $priv{$_}{16} = "STATE" for ("padav", "padhv", "padsv"); -@{$priv{"entersub"}}{1,4,16,32,64} = qw( DREF INARGS DBG TARG NOMOD ); +@{$priv{"entersub"}}{1,4,16,32,64} = qw( DREF INARGS DBG TARG ); @{$priv{rv2cv}}{1,8,128} = ("CONST","AMPER","NO()"); $priv{"gv"}{32} = "EARLYCV"; $priv{"aelem"}{16} = $priv{"helem"}{16} = "LVDEFER"; |