This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regexec.c: Remove unnecessary cBOOLs
[perl5.git] / opcode.h
index 0f5954f..359b98e 100644 (file)
--- a/opcode.h
+++ b/opcode.h
 #define Perl_pp_gpbynumber Perl_pp_gprotoent
 #define Perl_pp_gsbyname Perl_pp_gservent
 #define Perl_pp_gsbyport Perl_pp_gservent
+#define Perl_pp_snetent Perl_pp_shostent
+#define Perl_pp_sprotoent Perl_pp_shostent
+#define Perl_pp_sservent Perl_pp_shostent
 #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_spwent Perl_pp_ehostent
+#define Perl_pp_epwent Perl_pp_ehostent
 #define Perl_pp_ggrnam Perl_pp_ggrent
 #define Perl_pp_ggrgid Perl_pp_ggrent
+#define Perl_pp_sgrent Perl_pp_ehostent
+#define Perl_pp_egrent Perl_pp_ehostent
 #define Perl_pp_custom Perl_unimplemented_op
 #define Perl_pp_reach Perl_pp_rkeys
 #define Perl_pp_rvalues Perl_pp_rkeys
@@ -1250,9 +1257,9 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        Perl_pp_gsbyport,       /* implemented by Perl_pp_gservent */
        Perl_pp_gservent,
        Perl_pp_shostent,
-       Perl_pp_snetent,
-       Perl_pp_sprotoent,
-       Perl_pp_sservent,
+       Perl_pp_snetent,        /* implemented by Perl_pp_shostent */
+       Perl_pp_sprotoent,      /* implemented by Perl_pp_shostent */
+       Perl_pp_sservent,       /* implemented by Perl_pp_shostent */
        Perl_pp_ehostent,
        Perl_pp_enetent,        /* implemented by Perl_pp_ehostent */
        Perl_pp_eprotoent,      /* implemented by Perl_pp_ehostent */
@@ -1260,13 +1267,13 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        Perl_pp_gpwnam, /* implemented by Perl_pp_gpwent */
        Perl_pp_gpwuid, /* implemented by Perl_pp_gpwent */
        Perl_pp_gpwent,
-       Perl_pp_spwent,
-       Perl_pp_epwent,
+       Perl_pp_spwent, /* implemented by Perl_pp_ehostent */
+       Perl_pp_epwent, /* implemented by Perl_pp_ehostent */
        Perl_pp_ggrnam, /* implemented by Perl_pp_ggrent */
        Perl_pp_ggrgid, /* implemented by Perl_pp_ggrent */
        Perl_pp_ggrent,
-       Perl_pp_sgrent,
-       Perl_pp_egrent,
+       Perl_pp_sgrent, /* implemented by Perl_pp_ehostent */
+       Perl_pp_egrent, /* implemented by Perl_pp_ehostent */
        Perl_pp_getlogin,
        Perl_pp_syscall,
        Perl_pp_lock,