summaryrefslogtreecommitdiff
path: root/opcode.h
diff options
context:
space:
mode:
authorJim Cromie <jcromie@cpan.org>2008-02-09 00:56:59 -0700
committerNicholas Clark <nick@ccl4.org>2008-02-10 07:35:45 +0000
commite71197e2883063656534954aa6b56632e3c510c6 (patch)
tree14edced972e6d6863d839e7b546dcedb9667d4fa /opcode.h
parent806b8cc26f53c79876b70a2e4d874e2086fceac7 (diff)
downloadperl-e71197e2883063656534954aa6b56632e3c510c6.tar.gz
[patch] optimize OP_IS_(FILETEST|SOCKET) macros
Message-ID: <47ADBF3B.2050108@gmail.com> Date: Sat, 09 Feb 2008 07:56:59 -0700 p4raw-id: //depot/perl@33267
Diffstat (limited to 'opcode.h')
-rw-r--r--opcode.h20
1 files changed, 10 insertions, 10 deletions
diff --git a/opcode.h b/opcode.h
index 5c779c411c..82bca2def4 100644
--- a/opcode.h
+++ b/opcode.h
@@ -261,8 +261,6 @@ EXTCONST char* const PL_op_name[] = {
"sysseek",
"sysread",
"syswrite",
- "send",
- "recv",
"eof",
"tell",
"seek",
@@ -270,6 +268,8 @@ EXTCONST char* const PL_op_name[] = {
"fcntl",
"ioctl",
"flock",
+ "send",
+ "recv",
"socket",
"sockpair",
"bind",
@@ -632,8 +632,6 @@ EXTCONST char* const PL_op_desc[] = {
"sysseek",
"sysread",
"syswrite",
- "send",
- "recv",
"eof",
"tell",
"seek",
@@ -641,6 +639,8 @@ EXTCONST char* const PL_op_desc[] = {
"fcntl",
"ioctl",
"flock",
+ "send",
+ "recv",
"socket",
"socketpair",
"bind",
@@ -1017,8 +1017,6 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
MEMBER_TO_FPTR(Perl_pp_sysseek),
MEMBER_TO_FPTR(Perl_pp_sysread),
MEMBER_TO_FPTR(Perl_pp_send), /* Perl_pp_syswrite */
- MEMBER_TO_FPTR(Perl_pp_send),
- MEMBER_TO_FPTR(Perl_pp_sysread), /* Perl_pp_recv */
MEMBER_TO_FPTR(Perl_pp_eof),
MEMBER_TO_FPTR(Perl_pp_tell),
MEMBER_TO_FPTR(Perl_pp_sysseek), /* Perl_pp_seek */
@@ -1026,6 +1024,8 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
MEMBER_TO_FPTR(Perl_pp_ioctl), /* Perl_pp_fcntl */
MEMBER_TO_FPTR(Perl_pp_ioctl),
MEMBER_TO_FPTR(Perl_pp_flock),
+ MEMBER_TO_FPTR(Perl_pp_send),
+ MEMBER_TO_FPTR(Perl_pp_sysread), /* Perl_pp_recv */
MEMBER_TO_FPTR(Perl_pp_socket),
MEMBER_TO_FPTR(Perl_pp_sockpair),
MEMBER_TO_FPTR(Perl_pp_bind),
@@ -1399,8 +1399,6 @@ EXT Perl_check_t PL_check[] /* or perlvars.h */
MEMBER_TO_FPTR(Perl_ck_fun), /* sysseek */
MEMBER_TO_FPTR(Perl_ck_fun), /* sysread */
MEMBER_TO_FPTR(Perl_ck_fun), /* syswrite */
- MEMBER_TO_FPTR(Perl_ck_fun), /* send */
- MEMBER_TO_FPTR(Perl_ck_fun), /* recv */
MEMBER_TO_FPTR(Perl_ck_eof), /* eof */
MEMBER_TO_FPTR(Perl_ck_fun), /* tell */
MEMBER_TO_FPTR(Perl_ck_fun), /* seek */
@@ -1408,6 +1406,8 @@ EXT Perl_check_t PL_check[] /* or perlvars.h */
MEMBER_TO_FPTR(Perl_ck_fun), /* fcntl */
MEMBER_TO_FPTR(Perl_ck_fun), /* ioctl */
MEMBER_TO_FPTR(Perl_ck_fun), /* flock */
+ MEMBER_TO_FPTR(Perl_ck_fun), /* send */
+ MEMBER_TO_FPTR(Perl_ck_fun), /* recv */
MEMBER_TO_FPTR(Perl_ck_fun), /* socket */
MEMBER_TO_FPTR(Perl_ck_fun), /* sockpair */
MEMBER_TO_FPTR(Perl_ck_fun), /* bind */
@@ -1775,8 +1775,6 @@ EXTCONST U32 PL_opargs[] = {
0x0022c804, /* sysseek */
0x122ec81d, /* sysread */
0x1322c81d, /* syswrite */
- 0x1222c81d, /* send */
- 0x022ec81d, /* recv */
0x0001d614, /* eof */
0x0001d60c, /* tell */
0x0022c804, /* seek */
@@ -1784,6 +1782,8 @@ EXTCONST U32 PL_opargs[] = {
0x0022c80c, /* fcntl */
0x0022c80c, /* ioctl */
0x0002c91c, /* flock */
+ 0x1222c81d, /* send */
+ 0x022ec81d, /* recv */
0x0222c814, /* socket */
0x222cc814, /* sockpair */
0x0002c814, /* bind */