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 /opcode.h | |
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 'opcode.h')
-rw-r--r-- | opcode.h | 9 |
1 files changed, 6 insertions, 3 deletions
@@ -121,6 +121,9 @@ #define Perl_pp_gpbynumber Perl_pp_gprotoent #define Perl_pp_gsbyname Perl_pp_gservent #define Perl_pp_gsbyport Perl_pp_gservent +#define Perl_pp_enetent Perl_pp_ehostent +#define Perl_pp_eprotoent Perl_pp_ehostent +#define Perl_pp_eservent Perl_pp_ehostent #define Perl_pp_gpwnam Perl_pp_gpwent #define Perl_pp_gpwuid Perl_pp_gpwent #define Perl_pp_ggrnam Perl_pp_ggrent @@ -1251,9 +1254,9 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */ Perl_pp_sprotoent, Perl_pp_sservent, Perl_pp_ehostent, - Perl_pp_enetent, - Perl_pp_eprotoent, - Perl_pp_eservent, + Perl_pp_enetent, /* implemented by Perl_pp_ehostent */ + Perl_pp_eprotoent, /* implemented by Perl_pp_ehostent */ + Perl_pp_eservent, /* implemented by Perl_pp_ehostent */ Perl_pp_gpwnam, /* implemented by Perl_pp_gpwent */ Perl_pp_gpwuid, /* implemented by Perl_pp_gpwent */ Perl_pp_gpwent, |