Remove OA_RETINTEGER, unused since 2002 (commit e7311069df54baa6)
authorNicholas Clark <nick@ccl4.org>
Sat, 28 Aug 2010 14:35:57 +0000 (15:35 +0100)
committerNicholas Clark <nick@ccl4.org>
Sat, 28 Aug 2010 14:35:57 +0000 (15:35 +0100)
This returns us to 8 flag bits, and restores OCSHIFT and OASHIFT to 8 and 12
Previously these were 9 and 13, and effectively PL_opargs[] was using 33 of
32 bits, relying on the ugly hack that no 5 argument builtin had an optional
5th argument, hence the (13 + 5 * 4)th bit was always zero.
is effectively 33 bits.

op.h
opcode.h
opcode.pl

diff --git a/op.h b/op.h
index d537170..2ffd3e6 100644 (file)
--- a/op.h
+++ b/op.h
@@ -537,14 +537,13 @@ struct loop {
 #define OA_FOLDCONST 2
 #define OA_RETSCALAR 4
 #define OA_TARGET 8
-#define OA_RETINTEGER 16
+#define OA_TARGLEX 16
 #define OA_OTHERINT 32
 #define OA_DANGEROUS 64
 #define OA_DEFGV 128
-#define OA_TARGLEX 256
 
 /* The next 4 bits encode op class information */
-#define OCSHIFT 9
+#define OCSHIFT 8
 
 #define OA_CLASS_MASK (15 << OCSHIFT)
 
@@ -563,7 +562,7 @@ struct loop {
 #define OA_FILESTATOP (12 << OCSHIFT)
 #define OA_LOOPEXOP (13 << OCSHIFT)
 
-#define OASHIFT 13
+#define OASHIFT 12
 
 /* Remaining nybbles of PL_opargs */
 #define OA_SCALAR 1
index 0d85906..256c773 100644 (file)
--- a/opcode.h
+++ b/opcode.h
@@ -1557,369 +1557,369 @@ EXTCONST U32 PL_opargs[];
 EXTCONST U32 PL_opargs[] = {
        0x00000000,     /* null */
        0x00000000,     /* stub */
-       0x00003604,     /* scalar */
+       0x00001b04,     /* scalar */
        0x00000004,     /* pushmark */
-       0x00000014,     /* wantarray */
-       0x00000c04,     /* const */
-       0x00000c44,     /* gvsv */
-       0x00000c44,     /* gv */
-       0x00022440,     /* gelem */
+       0x00000004,     /* wantarray */
+       0x00000604,     /* const */
+       0x00000644,     /* gvsv */
+       0x00000644,     /* gv */
+       0x00011240,     /* gelem */
        0x00000044,     /* padsv */
        0x00000040,     /* padav */
        0x00000040,     /* padhv */
        0x00000040,     /* padany */
-       0x00000a40,     /* pushre */
-       0x00000244,     /* rv2gv */
-       0x00000244,     /* rv2sv */
-       0x00000214,     /* av2arylen */
-       0x00000240,     /* rv2cv */
-       0x00000c00,     /* anoncode */
-       0x00003604,     /* prototype */
-       0x00004201,     /* refgen */
-       0x00002206,     /* srefgen */
-       0x0001368c,     /* ref */
-       0x00122804,     /* bless */
-       0x00013688,     /* backtick */
-       0x00012808,     /* glob */
-       0x0001d608,     /* readline */
-       0x00000c08,     /* rcatline */
-       0x00002204,     /* regcmaybe */
-       0x00002204,     /* regcreset */
-       0x00002604,     /* regcomp */
-       0x00000a40,     /* match */
-       0x00000a04,     /* qr */
-       0x00002a54,     /* subst */
-       0x00000654,     /* substcont */
-       0x00003014,     /* trans */
+       0x00000540,     /* pushre */
+       0x00000144,     /* rv2gv */
+       0x00000144,     /* rv2sv */
+       0x00000104,     /* av2arylen */
+       0x00000140,     /* rv2cv */
+       0x00000600,     /* anoncode */
+       0x00001b04,     /* prototype */
+       0x00002101,     /* refgen */
+       0x00001106,     /* srefgen */
+       0x00009b8c,     /* ref */
+       0x00091404,     /* bless */
+       0x00009b88,     /* backtick */
+       0x00009408,     /* glob */
+       0x0000eb08,     /* readline */
+       0x00000608,     /* rcatline */
+       0x00001104,     /* regcmaybe */
+       0x00001104,     /* regcreset */
+       0x00001304,     /* regcomp */
+       0x00000540,     /* match */
+       0x00000504,     /* qr */
+       0x00001544,     /* subst */
+       0x00000344,     /* substcont */
+       0x00001804,     /* trans */
        0x00000004,     /* sassign */
-       0x00044408,     /* aassign */
-       0x0000560d,     /* chop */
-       0x0001368c,     /* schop */
-       0x0000570d,     /* chomp */
-       0x0001378c,     /* schomp */
-       0x00013694,     /* defined */
-       0x00013604,     /* undef */
-       0x00013684,     /* study */
-       0x0001368c,     /* pos */
-       0x00002264,     /* preinc */
-       0x00002254,     /* i_preinc */
-       0x00002264,     /* predec */
-       0x00002254,     /* i_predec */
-       0x0000226c,     /* postinc */
-       0x0000235c,     /* i_postinc */
-       0x0000226c,     /* postdec */
-       0x0000235c,     /* i_postdec */
-       0x0002250e,     /* pow */
-       0x0002252e,     /* multiply */
-       0x0002251e,     /* i_multiply */
-       0x0002252e,     /* divide */
-       0x0002251e,     /* i_divide */
-       0x0002253e,     /* modulo */
-       0x0002251e,     /* i_modulo */
-       0x00024409,     /* repeat */
-       0x0002252e,     /* add */
-       0x0002251e,     /* i_add */
-       0x0002252e,     /* subtract */
-       0x0002251e,     /* i_subtract */
-       0x0002250e,     /* concat */
-       0x0000290e,     /* stringify */
-       0x0002250e,     /* left_shift */
-       0x0002250e,     /* right_shift */
-       0x00022436,     /* lt */
-       0x00022416,     /* i_lt */
-       0x00022436,     /* gt */
-       0x00022416,     /* i_gt */
-       0x00022436,     /* le */
-       0x00022416,     /* i_le */
-       0x00022436,     /* ge */
-       0x00022416,     /* i_ge */
-       0x00022436,     /* eq */
-       0x00022416,     /* i_eq */
-       0x00022436,     /* ne */
-       0x00022416,     /* i_ne */
-       0x0002243e,     /* ncmp */
-       0x0002241e,     /* i_ncmp */
-       0x00022416,     /* slt */
-       0x00022416,     /* sgt */
-       0x00022416,     /* sle */
-       0x00022416,     /* sge */
-       0x00022416,     /* seq */
-       0x00022416,     /* sne */
-       0x0002241e,     /* scmp */
-       0x0002240e,     /* bit_and */
-       0x0002240e,     /* bit_xor */
-       0x0002240e,     /* bit_or */
-       0x0000222e,     /* negate */
-       0x0000231e,     /* i_negate */
-       0x00002216,     /* not */
-       0x0000220e,     /* complement */
-       0x00000404,     /* smartmatch */
-       0x0002290e,     /* atan2 */
-       0x0001378e,     /* sin */
-       0x0001378e,     /* cos */
-       0x0001370c,     /* rand */
-       0x0001370c,     /* srand */
-       0x0001378e,     /* exp */
-       0x0001378e,     /* log */
-       0x0001378e,     /* sqrt */
-       0x0001378e,     /* int */
-       0x0001378e,     /* hex */
-       0x0001378e,     /* oct */
-       0x0001378e,     /* abs */
-       0x0001379e,     /* length */
-       0x1322280c,     /* substr */
-       0x0022281c,     /* vec */
-       0x0122291c,     /* index */
-       0x0122291c,     /* rindex */
-       0x0004280f,     /* sprintf */
-       0x00042805,     /* formline */
-       0x0001379e,     /* ord */
-       0x0001378e,     /* chr */
-       0x0002290e,     /* crypt */
-       0x0001368e,     /* ucfirst */
-       0x0001368e,     /* lcfirst */
-       0x0001368e,     /* uc */
-       0x0001368e,     /* lc */
-       0x0001368e,     /* quotemeta */
-       0x00000248,     /* rv2av */
-       0x00026c04,     /* aelemfast */
-       0x00026404,     /* aelem */
-       0x00046801,     /* aslice */
-       0x00007600,     /* aeach */
-       0x00007608,     /* akeys */
-       0x00007608,     /* avalues */
-       0x00009600,     /* each */
-       0x00009608,     /* values */
-       0x00009608,     /* keys */
-       0x00003600,     /* delete */
-       0x00003614,     /* exists */
-       0x00000248,     /* rv2hv */
-       0x00028404,     /* helem */
-       0x00048801,     /* hslice */
-       0x00009600,     /* boolkeys */
-       0x00122800,     /* unpack */
-       0x0004280d,     /* pack */
-       0x00222808,     /* split */
-       0x0004280d,     /* join */
-       0x00004801,     /* list */
-       0x00448400,     /* lslice */
-       0x00004805,     /* anonlist */
-       0x00004805,     /* anonhash */
-       0x05326801,     /* splice */
-       0x0004691d,     /* push */
-       0x00017604,     /* pop */
-       0x00017604,     /* shift */
-       0x0004691d,     /* unshift */
-       0x0005a841,     /* sort */
-       0x00004809,     /* reverse */
-       0x0004a841,     /* grepstart */
-       0x00000648,     /* grepwhile */
-       0x0004a841,     /* mapstart */
-       0x00000648,     /* mapwhile */
-       0x00022600,     /* range */
-       0x00022200,     /* flip */
-       0x00000200,     /* flop */
-       0x00000600,     /* and */
-       0x00000600,     /* or */
-       0x00022406,     /* xor */
-       0x00000600,     /* dor */
-       0x00000640,     /* cond_expr */
-       0x00000604,     /* andassign */
-       0x00000604,     /* orassign */
-       0x00000604,     /* dorassign */
-       0x00000240,     /* method */
-       0x00004249,     /* entersub */
-       0x00000200,     /* leavesub */
-       0x00000200,     /* leavesublv */
-       0x00013608,     /* caller */
-       0x0000481d,     /* warn */
-       0x0000485d,     /* die */
-       0x00013614,     /* reset */
-       0x00000800,     /* lineseq */
-       0x00001404,     /* nextstate */
-       0x00001404,     /* dbstate */
+       0x00022208,     /* aassign */
+       0x00002b0d,     /* chop */
+       0x00009b8c,     /* schop */
+       0x00002b1d,     /* chomp */
+       0x00009b9c,     /* schomp */
+       0x00009b84,     /* defined */
+       0x00009b04,     /* undef */
+       0x00009b84,     /* study */
+       0x00009b8c,     /* pos */
+       0x00001164,     /* preinc */
+       0x00001144,     /* i_preinc */
+       0x00001164,     /* predec */
+       0x00001144,     /* i_predec */
+       0x0000116c,     /* postinc */
+       0x0000115c,     /* i_postinc */
+       0x0000116c,     /* postdec */
+       0x0000115c,     /* i_postdec */
+       0x0001121e,     /* pow */
+       0x0001123e,     /* multiply */
+       0x0001121e,     /* i_multiply */
+       0x0001123e,     /* divide */
+       0x0001121e,     /* i_divide */
+       0x0001123e,     /* modulo */
+       0x0001121e,     /* i_modulo */
+       0x00012209,     /* repeat */
+       0x0001123e,     /* add */
+       0x0001121e,     /* i_add */
+       0x0001123e,     /* subtract */
+       0x0001121e,     /* i_subtract */
+       0x0001121e,     /* concat */
+       0x0000141e,     /* stringify */
+       0x0001121e,     /* left_shift */
+       0x0001121e,     /* right_shift */
+       0x00011226,     /* lt */
+       0x00011206,     /* i_lt */
+       0x00011226,     /* gt */
+       0x00011206,     /* i_gt */
+       0x00011226,     /* le */
+       0x00011206,     /* i_le */
+       0x00011226,     /* ge */
+       0x00011206,     /* i_ge */
+       0x00011226,     /* eq */
+       0x00011206,     /* i_eq */
+       0x00011226,     /* ne */
+       0x00011206,     /* i_ne */
+       0x0001122e,     /* ncmp */
+       0x0001120e,     /* i_ncmp */
+       0x00011206,     /* slt */
+       0x00011206,     /* sgt */
+       0x00011206,     /* sle */
+       0x00011206,     /* sge */
+       0x00011206,     /* seq */
+       0x00011206,     /* sne */
+       0x0001120e,     /* scmp */
+       0x0001120e,     /* bit_and */
+       0x0001120e,     /* bit_xor */
+       0x0001120e,     /* bit_or */
+       0x0000112e,     /* negate */
+       0x0000111e,     /* i_negate */
+       0x00001106,     /* not */
+       0x0000110e,     /* complement */
+       0x00000204,     /* smartmatch */
+       0x0001141e,     /* atan2 */
+       0x00009b9e,     /* sin */
+       0x00009b9e,     /* cos */
+       0x00009b1c,     /* rand */
+       0x00009b1c,     /* srand */
+       0x00009b9e,     /* exp */
+       0x00009b9e,     /* log */
+       0x00009b9e,     /* sqrt */
+       0x00009b9e,     /* int */
+       0x00009b9e,     /* hex */
+       0x00009b9e,     /* oct */
+       0x00009b9e,     /* abs */
+       0x00009b9e,     /* length */
+       0x0991140c,     /* substr */
+       0x0011140c,     /* vec */
+       0x0091141c,     /* index */
+       0x0091141c,     /* rindex */
+       0x0002140f,     /* sprintf */
+       0x00021405,     /* formline */
+       0x00009b9e,     /* ord */
+       0x00009b9e,     /* chr */
+       0x0001141e,     /* crypt */
+       0x00009b8e,     /* ucfirst */
+       0x00009b8e,     /* lcfirst */
+       0x00009b8e,     /* uc */
+       0x00009b8e,     /* lc */
+       0x00009b8e,     /* quotemeta */
+       0x00000148,     /* rv2av */
+       0x00013604,     /* aelemfast */
+       0x00013204,     /* aelem */
+       0x00023401,     /* aslice */
+       0x00003b00,     /* aeach */
+       0x00003b08,     /* akeys */
+       0x00003b08,     /* avalues */
+       0x00004b00,     /* each */
+       0x00004b08,     /* values */
+       0x00004b08,     /* keys */
+       0x00001b00,     /* delete */
+       0x00001b04,     /* exists */
+       0x00000148,     /* rv2hv */
+       0x00014204,     /* helem */
+       0x00024401,     /* hslice */
+       0x00004b00,     /* boolkeys */
+       0x00091400,     /* unpack */
+       0x0002140d,     /* pack */
+       0x00111408,     /* split */
+       0x0002140d,     /* join */
+       0x00002401,     /* list */
+       0x00224200,     /* lslice */
+       0x00002405,     /* anonlist */
+       0x00002405,     /* anonhash */
+       0x02993401,     /* splice */
+       0x0002341d,     /* push */
+       0x0000bb04,     /* pop */
+       0x0000bb04,     /* shift */
+       0x0002341d,     /* unshift */
+       0x0002d441,     /* sort */
+       0x00002409,     /* reverse */
+       0x00025441,     /* grepstart */
+       0x00000348,     /* grepwhile */
+       0x00025441,     /* mapstart */
+       0x00000348,     /* mapwhile */
+       0x00011300,     /* range */
+       0x00011100,     /* flip */
+       0x00000100,     /* flop */
+       0x00000300,     /* and */
+       0x00000300,     /* or */
+       0x00011206,     /* xor */
+       0x00000300,     /* dor */
+       0x00000340,     /* cond_expr */
+       0x00000304,     /* andassign */
+       0x00000304,     /* orassign */
+       0x00000304,     /* dorassign */
+       0x00000140,     /* method */
+       0x00002149,     /* entersub */
+       0x00000100,     /* leavesub */
+       0x00000100,     /* leavesublv */
+       0x00009b08,     /* caller */
+       0x0000240d,     /* warn */
+       0x0000244d,     /* die */
+       0x00009b04,     /* reset */
+       0x00000400,     /* lineseq */
+       0x00000a04,     /* nextstate */
+       0x00000a04,     /* dbstate */
        0x00000004,     /* unstack */
        0x00000000,     /* enter */
-       0x00000800,     /* leave */
-       0x00000800,     /* scope */
-       0x00001240,     /* enteriter */
+       0x00000400,     /* leave */
+       0x00000400,     /* scope */
+       0x00000940,     /* enteriter */
        0x00000000,     /* iter */
-       0x00001240,     /* enterloop */
-       0x00000400,     /* leaveloop */
-       0x00004841,     /* return */
-       0x00001a44,     /* last */
-       0x00001a44,     /* next */
-       0x00001a44,     /* redo */
-       0x00001a44,     /* dump */
-       0x00001a44,     /* goto */
-       0x00013644,     /* exit */
-       0x00000c40,     /* method_named */
-       0x00000640,     /* entergiven */
-       0x00000200,     /* leavegiven */
-       0x00000640,     /* enterwhen */
-       0x00000200,     /* leavewhen */
+       0x00000940,     /* enterloop */
+       0x00000200,     /* leaveloop */
+       0x00002441,     /* return */
+       0x00000d44,     /* last */
+       0x00000d44,     /* next */
+       0x00000d44,     /* redo */
+       0x00000d44,     /* dump */
+       0x00000d44,     /* goto */
+       0x00009b44,     /* exit */
+       0x00000640,     /* method_named */
+       0x00000340,     /* entergiven */
+       0x00000100,     /* leavegiven */
+       0x00000340,     /* enterwhen */
+       0x00000100,     /* leavewhen */
        0x00000000,     /* break */
        0x00000000,     /* continue */
-       0x0052c81d,     /* open */
-       0x0001d614,     /* close */
-       0x000cc814,     /* pipe_op */
-       0x0000d61c,     /* fileno */
-       0x0001361c,     /* umask */
-       0x0012c804,     /* binmode */
-       0x0042e855,     /* tie */
-       0x0000f614,     /* untie */
-       0x0000f604,     /* tied */
-       0x00228814,     /* dbmopen */
-       0x00009614,     /* dbmclose */
-       0x02222808,     /* sselect */
-       0x0001c80c,     /* select */
-       0x0001d60c,     /* getc */
-       0x122ec81d,     /* read */
-       0x0001d654,     /* enterwrite */
-       0x00000200,     /* leavewrite */
-       0x0005c815,     /* prtf */
-       0x0005c815,     /* print */
-       0x0005c815,     /* say */
-       0x1222c804,     /* sysopen */
-       0x0022c804,     /* sysseek */
-       0x122ec81d,     /* sysread */
-       0x1322c81d,     /* syswrite */
-       0x0001d614,     /* eof */
-       0x0001d60c,     /* tell */
-       0x0022c804,     /* seek */
-       0x00022814,     /* truncate */
-       0x0022c80c,     /* fcntl */
-       0x0022c80c,     /* ioctl */
-       0x0002c91c,     /* flock */
-       0x1222c81d,     /* send */
-       0x022ec81d,     /* recv */
-       0x0222c814,     /* socket */
-       0x222cc814,     /* sockpair */
-       0x0002c814,     /* bind */
-       0x0002c814,     /* connect */
-       0x0002c814,     /* listen */
-       0x000cc81c,     /* accept */
-       0x0002c81c,     /* shutdown */
-       0x0022c814,     /* gsockopt */
-       0x0222c814,     /* ssockopt */
-       0x0000d614,     /* getsockname */
-       0x0000d614,     /* getpeername */
-       0x0000d880,     /* lstat */
-       0x0000d880,     /* stat */
-       0x0000d894,     /* ftrread */
-       0x0000d894,     /* ftrwrite */
-       0x0000d894,     /* ftrexec */
-       0x0000d894,     /* fteread */
-       0x0000d894,     /* ftewrite */
-       0x0000d894,     /* fteexec */
-       0x0000d894,     /* ftis */
-       0x0000d89c,     /* ftsize */
-       0x0000d88c,     /* ftmtime */
-       0x0000d88c,     /* ftatime */
-       0x0000d88c,     /* ftctime */
-       0x0000d894,     /* ftrowned */
-       0x0000d894,     /* fteowned */
-       0x0000d894,     /* ftzero */
-       0x0000d894,     /* ftsock */
-       0x0000d894,     /* ftchr */
-       0x0000d894,     /* ftblk */
-       0x0000d894,     /* ftfile */
-       0x0000d894,     /* ftdir */
-       0x0000d894,     /* ftpipe */
-       0x0000d894,     /* ftsuid */
-       0x0000d894,     /* ftsgid */
-       0x0000d894,     /* ftsvtx */
-       0x0000d894,     /* ftlink */
-       0x0000d814,     /* fttty */
-       0x0000d894,     /* fttext */
-       0x0000d894,     /* ftbinary */
-       0x0001371c,     /* chdir */
-       0x0000491d,     /* chown */
-       0x0001379c,     /* chroot */
-       0x0000499d,     /* unlink */
-       0x0000491d,     /* chmod */
-       0x0000491d,     /* utime */
-       0x0002291c,     /* rename */
-       0x0002291c,     /* link */
-       0x0002291c,     /* symlink */
-       0x0001368c,     /* readlink */
-       0x0013299c,     /* mkdir */
-       0x0001379c,     /* rmdir */
-       0x0002c814,     /* open_dir */
-       0x0000d600,     /* readdir */
-       0x0000d60c,     /* telldir */
-       0x0002c804,     /* seekdir */
-       0x0000d604,     /* rewinddir */
-       0x0000d614,     /* closedir */
-       0x0000001c,     /* fork */
-       0x0000011c,     /* wait */
-       0x0002291c,     /* waitpid */
-       0x0005291d,     /* system */
-       0x0005295d,     /* exec */
-       0x0000495d,     /* kill */
-       0x0000011c,     /* getppid */
-       0x0001371c,     /* getpgrp */
-       0x0013291c,     /* setpgrp */
-       0x0002291c,     /* getpriority */
-       0x0022291c,     /* setpriority */
-       0x0000011c,     /* time */
+       0x0029640d,     /* open */
+       0x0000eb04,     /* close */
+       0x00066404,     /* pipe_op */
+       0x00006b0c,     /* fileno */
+       0x00009b0c,     /* umask */
+       0x00096404,     /* binmode */
+       0x00217445,     /* tie */
+       0x00007b04,     /* untie */
+       0x00007b04,     /* tied */
+       0x00114404,     /* dbmopen */
+       0x00004b04,     /* dbmclose */
+       0x01111408,     /* sselect */
+       0x0000e40c,     /* select */
+       0x0000eb0c,     /* getc */
+       0x0917640d,     /* read */
+       0x0000eb44,     /* enterwrite */
+       0x00000100,     /* leavewrite */
+       0x0002e405,     /* prtf */
+       0x0002e405,     /* print */
+       0x0002e405,     /* say */
+       0x09116404,     /* sysopen */
+       0x00116404,     /* sysseek */
+       0x0917640d,     /* sysread */
+       0x0991640d,     /* syswrite */
+       0x0000eb04,     /* eof */
+       0x0000eb0c,     /* tell */
+       0x00116404,     /* seek */
+       0x00011404,     /* truncate */
+       0x0011640c,     /* fcntl */
+       0x0011640c,     /* ioctl */
+       0x0001641c,     /* flock */
+       0x0911640d,     /* send */
+       0x0117640d,     /* recv */
+       0x01116404,     /* socket */
+       0x11166404,     /* sockpair */
+       0x00016404,     /* bind */
+       0x00016404,     /* connect */
+       0x00016404,     /* listen */
+       0x0006640c,     /* accept */
+       0x0001640c,     /* shutdown */
+       0x00116404,     /* gsockopt */
+       0x01116404,     /* ssockopt */
+       0x00006b04,     /* getsockname */
+       0x00006b04,     /* getpeername */
+       0x00006c80,     /* lstat */
+       0x00006c80,     /* stat */
+       0x00006c84,     /* ftrread */
+       0x00006c84,     /* ftrwrite */
+       0x00006c84,     /* ftrexec */
+       0x00006c84,     /* fteread */
+       0x00006c84,     /* ftewrite */
+       0x00006c84,     /* fteexec */
+       0x00006c84,     /* ftis */
+       0x00006c8c,     /* ftsize */
+       0x00006c8c,     /* ftmtime */
+       0x00006c8c,     /* ftatime */
+       0x00006c8c,     /* ftctime */
+       0x00006c84,     /* ftrowned */
+       0x00006c84,     /* fteowned */
+       0x00006c84,     /* ftzero */
+       0x00006c84,     /* ftsock */
+       0x00006c84,     /* ftchr */
+       0x00006c84,     /* ftblk */
+       0x00006c84,     /* ftfile */
+       0x00006c84,     /* ftdir */
+       0x00006c84,     /* ftpipe */
+       0x00006c84,     /* ftsuid */
+       0x00006c84,     /* ftsgid */
+       0x00006c84,     /* ftsvtx */
+       0x00006c84,     /* ftlink */
+       0x00006c04,     /* fttty */
+       0x00006c84,     /* fttext */
+       0x00006c84,     /* ftbinary */
+       0x00009b1c,     /* chdir */
+       0x0000241d,     /* chown */
+       0x00009b9c,     /* chroot */
+       0x0000249d,     /* unlink */
+       0x0000241d,     /* chmod */
+       0x0000241d,     /* utime */
+       0x0001141c,     /* rename */
+       0x0001141c,     /* link */
+       0x0001141c,     /* symlink */
+       0x00009b8c,     /* readlink */
+       0x0009949c,     /* mkdir */
+       0x00009b9c,     /* rmdir */
+       0x00016404,     /* open_dir */
+       0x00006b00,     /* readdir */
+       0x00006b0c,     /* telldir */
+       0x00016404,     /* seekdir */
+       0x00006b04,     /* rewinddir */
+       0x00006b04,     /* closedir */
+       0x0000000c,     /* fork */
+       0x0000001c,     /* wait */
+       0x0001141c,     /* waitpid */
+       0x0002941d,     /* system */
+       0x0002945d,     /* exec */
+       0x0000245d,     /* kill */
+       0x0000001c,     /* getppid */
+       0x00009b1c,     /* getpgrp */
+       0x0009941c,     /* setpgrp */
+       0x0001141c,     /* getpriority */
+       0x0011141c,     /* setpriority */
+       0x0000001c,     /* time */
        0x00000000,     /* tms */
-       0x00013608,     /* localtime */
-       0x00013608,     /* gmtime */
-       0x0001369c,     /* alarm */
-       0x0001371c,     /* sleep */
-       0x0022281d,     /* shmget */
-       0x0022281d,     /* shmctl */
-       0x0222281d,     /* shmread */
-       0x0222281d,     /* shmwrite */
-       0x0002281d,     /* msgget */
-       0x0022281d,     /* msgctl */
-       0x0022281d,     /* msgsnd */
-       0x2222281d,     /* msgrcv */
-       0x0002281d,     /* semop */
-       0x0022281d,     /* semget */
-       0x0222281d,     /* semctl */
-       0x000136c0,     /* require */
-       0x00002240,     /* dofile */
-       0x00000c04,     /* hintseval */
-       0x00003640,     /* entereval */
-       0x00002200,     /* leaveeval */
-       0x00001640,     /* entertry */
-       0x00000800,     /* leavetry */
-       0x00003600,     /* ghbyname */
-       0x00022800,     /* ghbyaddr */
+       0x00009b08,     /* localtime */
+       0x00009b08,     /* gmtime */
+       0x00009b8c,     /* alarm */
+       0x00009b1c,     /* sleep */
+       0x0011140d,     /* shmget */
+       0x0011140d,     /* shmctl */
+       0x0111140d,     /* shmread */
+       0x0111140d,     /* shmwrite */
+       0x0001140d,     /* msgget */
+       0x0011140d,     /* msgctl */
+       0x0011140d,     /* msgsnd */
+       0x1111140d,     /* msgrcv */
+       0x0001140d,     /* semop */
+       0x0011140d,     /* semget */
+       0x0111140d,     /* semctl */
+       0x00009bc0,     /* require */
+       0x00001140,     /* dofile */
+       0x00000604,     /* hintseval */
+       0x00001b40,     /* entereval */
+       0x00001100,     /* leaveeval */
+       0x00000b40,     /* entertry */
+       0x00000400,     /* leavetry */
+       0x00001b00,     /* ghbyname */
+       0x00011400,     /* ghbyaddr */
        0x00000000,     /* ghostent */
-       0x00003600,     /* gnbyname */
-       0x00022800,     /* gnbyaddr */
+       0x00001b00,     /* gnbyname */
+       0x00011400,     /* gnbyaddr */
        0x00000000,     /* gnetent */
-       0x00003600,     /* gpbyname */
-       0x00002800,     /* gpbynumber */
+       0x00001b00,     /* gpbyname */
+       0x00001400,     /* gpbynumber */
        0x00000000,     /* gprotoent */
-       0x00022800,     /* gsbyname */
-       0x00022800,     /* gsbyport */
+       0x00011400,     /* gsbyname */
+       0x00011400,     /* gsbyport */
        0x00000000,     /* gservent */
-       0x00003614,     /* shostent */
-       0x00003614,     /* snetent */
-       0x00003614,     /* sprotoent */
-       0x00003614,     /* sservent */
-       0x00000014,     /* ehostent */
-       0x00000014,     /* enetent */
-       0x00000014,     /* eprotoent */
-       0x00000014,     /* eservent */
-       0x00003600,     /* gpwnam */
-       0x00003600,     /* gpwuid */
+       0x00001b04,     /* shostent */
+       0x00001b04,     /* snetent */
+       0x00001b04,     /* sprotoent */
+       0x00001b04,     /* sservent */
+       0x00000004,     /* ehostent */
+       0x00000004,     /* enetent */
+       0x00000004,     /* eprotoent */
+       0x00000004,     /* eservent */
+       0x00001b00,     /* gpwnam */
+       0x00001b00,     /* gpwuid */
        0x00000000,     /* gpwent */
-       0x00000014,     /* spwent */
-       0x00000014,     /* epwent */
-       0x00003600,     /* ggrnam */
-       0x00003600,     /* ggrgid */
+       0x00000004,     /* spwent */
+       0x00000004,     /* epwent */
+       0x00001b00,     /* ggrnam */
+       0x00001b00,     /* ggrgid */
        0x00000000,     /* ggrent */
-       0x00000014,     /* sgrent */
-       0x00000014,     /* egrent */
+       0x00000004,     /* sgrent */
+       0x00000004,     /* egrent */
        0x0000000c,     /* getlogin */
-       0x0004281d,     /* syscall */
-       0x0000f604,     /* lock */
-       0x00000600,     /* once */
+       0x0002140d,     /* syscall */
+       0x00007b04,     /* lock */
+       0x00000300,     /* once */
        0x00000000,     /* custom */
 };
 #endif
index 1b8c688..e90c929 100755 (executable)
--- a/opcode.pl
+++ b/opcode.pl
@@ -348,8 +348,8 @@ my %opflags = (
     'f' =>   2,                # fold constants
     's' =>   4,                # always produces scalar
     't' =>   8,                # needs target scalar
-    'T' =>   8 | 256,  # ... which may be lexical
-    'i' =>  16,                # always produces integer
+    'T' =>   8 | 16,   # ... which may be lexical
+    'i' =>   0,                # always produces integer (unused since e7311069)
     'I' =>  32,                # has corresponding int op
     'd' =>  64,                # danger, unknown side effects
     'u' => 128,                # defaults to $_
@@ -358,8 +358,8 @@ my %opflags = (
 my %OP_IS_SOCKET;
 my %OP_IS_FILETEST;
 my %OP_IS_FT_ACCESS;
-my $OCSHIFT = 9;
-my $OASHIFT = 13;
+my $OCSHIFT = 8;
+my $OASHIFT = 12;
 
 for my $op (@ops) {
     my $argsum = 0;