diff options
author | Father Chrysostomos <sprout@cpan.org> | 2014-09-24 00:58:23 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2014-10-10 21:54:18 -0700 |
commit | 4c5bab508cf172e32fdb9e8567ff635b6d783791 (patch) | |
tree | 08a82d6118e16e36ac060d2080661d41917234a8 /regen/opcode.pl | |
parent | 238ef7dc59bb442965485ccd157672eaccb98595 (diff) | |
download | perl-4c5bab508cf172e32fdb9e8567ff635b6d783791.tar.gz |
Add lvref op type
Diffstat (limited to 'regen/opcode.pl')
-rwxr-xr-x | regen/opcode.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/regen/opcode.pl b/regen/opcode.pl index fe1488c259..10c708bb5c 100755 --- a/regen/opcode.pl +++ b/regen/opcode.pl @@ -55,7 +55,7 @@ while (<OPS>) { $args = '' unless defined $args; warn qq[Description "$desc" duplicates $seen{$desc}\n] - if $seen{$desc} and $key !~ "transr|(?:intro|clone)cv"; + if $seen{$desc} and $key !~ "transr|(?:intro|clone)cv|lvref"; die qq[Opcode "$key" duplicates $seen{$key}\n] if $seen{$key}; die qq[Opcode "freed" is reserved for the slab allocator\n] if $key eq 'freed'; |