diff options
author | Nicholas Clark <nick@ccl4.org> | 2011-01-10 10:12:10 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2011-01-10 11:19:18 +0000 |
commit | d8ef1fcdce21e8d5905a1ed77bc1caa307b2b79e (patch) | |
tree | b4cbfb1d1239da334e10e1deee3c3fa1d0fe4aba /regen/opcode.pl | |
parent | 111d382d531b38ae57c1b946e9ab48608cf58309 (diff) | |
download | perl-d8ef1fcdce21e8d5905a1ed77bc1caa307b2b79e.tar.gz |
Merge the implementations of pp_e{host,net,proto,serv}ent.
PL_op_desc[] rather than PL_op_name(), as the OPs are internally named e*ent,
but implement the ent*ent functions, and when unimplemented report themselves
using the function name. No need for OP_DESC(), as the switch statement means
that we can't encounter OP_CUSTOM.
Diffstat (limited to 'regen/opcode.pl')
-rwxr-xr-x | regen/opcode.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/regen/opcode.pl b/regen/opcode.pl index 701ec27bf5..2d584503b9 100755 --- a/regen/opcode.pl +++ b/regen/opcode.pl @@ -117,6 +117,7 @@ my @raw_alias = ( Perl_pp_predec => ['i_predec'], Perl_pp_postinc => ['i_postinc'], Perl_pp_postdec => ['i_postdec'], + Perl_pp_ehostent => [qw(enetent eprotoent eservent)], ); while (my ($func, $names) = splice @raw_alias, 0, 2) { |