diff options
Diffstat (limited to 'opcode.h')
-rw-r--r-- | opcode.h | 313 |
1 files changed, 158 insertions, 155 deletions
@@ -2265,6 +2265,7 @@ END_EXTERN_C #define OPpALLOW_FAKE 0x40 #define OPpASSIGN_BACKWARDS 0x40 #define OPpASSIGN_COMMON_SCALAR 0x40 +#define OPpCONCAT_NESTED 0x40 #define OPpCONST_BARE 0x40 #define OPpCOREARGS_SCALARMOD 0x40 #define OPpENTERSUB_DB 0x40 @@ -2380,6 +2381,7 @@ EXTCONST char PL_op_private_labels[] = { 'L','V','S','U','B','\0', 'M','A','R','K','\0', 'N','E','G','\0', + 'N','E','S','T','E','D','\0', 'N','O','(',')','\0', 'N','O','I','N','I','T','\0', 'N','O','V','E','R','\0', @@ -2428,14 +2430,14 @@ EXTCONST char PL_op_private_labels[] = { EXTCONST I16 PL_op_private_bitfields[] = { 0, 8, -1, 0, 8, -1, - 0, 572, -1, + 0, 579, -1, 0, 8, -1, 0, 8, -1, - 0, 579, -1, - 0, 568, -1, - 1, -1, 0, 536, 1, 40, 2, 286, -1, + 0, 586, -1, + 0, 575, -1, + 1, -1, 0, 543, 1, 40, 2, 286, -1, 4, -1, 1, 167, 2, 174, 3, 181, -1, - 4, -1, 0, 536, 1, 40, 2, 286, 3, 117, -1, + 4, -1, 0, 543, 1, 40, 2, 286, 3, 117, -1, }; @@ -2510,9 +2512,9 @@ EXTCONST I16 PL_op_private_bitdef_ix[] = { 80, /* i_add */ 80, /* subtract */ 80, /* i_subtract */ - 80, /* concat */ - 84, /* multiconcat */ - 90, /* stringify */ + 84, /* concat */ + 87, /* multiconcat */ + 93, /* stringify */ 80, /* left_shift */ 80, /* right_shift */ 12, /* lt */ @@ -2552,11 +2554,11 @@ EXTCONST I16 PL_op_private_bitdef_ix[] = { 75, /* ncomplement */ 75, /* scomplement */ 12, /* smartmatch */ - 90, /* atan2 */ + 93, /* atan2 */ 75, /* sin */ 75, /* cos */ - 90, /* rand */ - 90, /* srand */ + 93, /* rand */ + 93, /* srand */ 75, /* exp */ 75, /* log */ 75, /* sqrt */ @@ -2564,97 +2566,97 @@ EXTCONST I16 PL_op_private_bitdef_ix[] = { 75, /* hex */ 75, /* oct */ 75, /* abs */ - 92, /* length */ - 95, /* substr */ - 98, /* vec */ - 100, /* index */ - 100, /* rindex */ + 95, /* length */ + 98, /* substr */ + 101, /* vec */ + 103, /* index */ + 103, /* rindex */ 52, /* sprintf */ 52, /* formline */ 75, /* ord */ 75, /* chr */ - 90, /* crypt */ + 93, /* crypt */ 0, /* ucfirst */ 0, /* lcfirst */ 0, /* uc */ 0, /* lc */ 0, /* quotemeta */ - 104, /* rv2av */ - 111, /* aelemfast */ - 111, /* aelemfast_lex */ - 112, /* aelem */ - 117, /* aslice */ - 120, /* kvaslice */ + 107, /* rv2av */ + 114, /* aelemfast */ + 114, /* aelemfast_lex */ + 115, /* aelem */ + 120, /* aslice */ + 123, /* kvaslice */ 0, /* aeach */ 0, /* avalues */ 40, /* akeys */ 0, /* each */ 40, /* values */ 40, /* keys */ - 121, /* delete */ - 125, /* exists */ - 127, /* rv2hv */ - 112, /* helem */ - 117, /* hslice */ - 120, /* kvhslice */ - 135, /* multideref */ + 124, /* delete */ + 128, /* exists */ + 130, /* rv2hv */ + 115, /* helem */ + 120, /* hslice */ + 123, /* kvhslice */ + 138, /* multideref */ 52, /* unpack */ 52, /* pack */ - 142, /* split */ + 145, /* split */ 52, /* join */ - 147, /* list */ + 150, /* list */ 12, /* lslice */ 52, /* anonlist */ 52, /* anonhash */ 52, /* splice */ - 90, /* push */ + 93, /* push */ 0, /* pop */ 0, /* shift */ - 90, /* unshift */ - 149, /* sort */ - 156, /* reverse */ + 93, /* unshift */ + 152, /* sort */ + 159, /* reverse */ 0, /* grepstart */ - 158, /* grepwhile */ + 161, /* grepwhile */ 0, /* mapstart */ 0, /* mapwhile */ 0, /* range */ - 160, /* flip */ - 160, /* flop */ + 163, /* flip */ + 163, /* flop */ 0, /* and */ 0, /* or */ 12, /* xor */ 0, /* dor */ - 162, /* cond_expr */ + 165, /* cond_expr */ 0, /* andassign */ 0, /* orassign */ 0, /* dorassign */ - 164, /* entersub */ - 171, /* leavesub */ - 171, /* leavesublv */ + 167, /* entersub */ + 174, /* leavesub */ + 174, /* leavesublv */ 0, /* argcheck */ - 173, /* argelem */ + 176, /* argelem */ 0, /* argdefelem */ - 175, /* caller */ + 178, /* caller */ 52, /* warn */ 52, /* die */ 52, /* reset */ -1, /* lineseq */ - 177, /* nextstate */ - 177, /* dbstate */ + 180, /* nextstate */ + 180, /* dbstate */ -1, /* unstack */ -1, /* enter */ - 178, /* leave */ + 181, /* leave */ -1, /* scope */ - 180, /* enteriter */ - 183, /* iter */ + 183, /* enteriter */ + 186, /* iter */ -1, /* enterloop */ - 184, /* leaveloop */ + 187, /* leaveloop */ -1, /* return */ - 186, /* last */ - 186, /* next */ - 186, /* redo */ - 186, /* dump */ - 186, /* goto */ + 189, /* last */ + 189, /* next */ + 189, /* redo */ + 189, /* dump */ + 189, /* goto */ 52, /* exit */ 0, /* method */ 0, /* method_named */ @@ -2665,7 +2667,7 @@ EXTCONST I16 PL_op_private_bitdef_ix[] = { 0, /* enterwhereso */ 0, /* leavewhereso */ -1, /* continue */ - 188, /* open */ + 191, /* open */ 52, /* close */ 52, /* pipe_op */ 52, /* fileno */ @@ -2681,7 +2683,7 @@ EXTCONST I16 PL_op_private_bitdef_ix[] = { 52, /* getc */ 52, /* read */ 52, /* enterwrite */ - 171, /* leavewrite */ + 174, /* leavewrite */ -1, /* prtf */ -1, /* print */ -1, /* say */ @@ -2695,7 +2697,7 @@ EXTCONST I16 PL_op_private_bitdef_ix[] = { 52, /* truncate */ 52, /* fcntl */ 52, /* ioctl */ - 90, /* flock */ + 93, /* flock */ 52, /* send */ 52, /* recv */ 52, /* socket */ @@ -2711,44 +2713,44 @@ EXTCONST I16 PL_op_private_bitdef_ix[] = { 0, /* getpeername */ 0, /* lstat */ 0, /* stat */ - 193, /* ftrread */ - 193, /* ftrwrite */ - 193, /* ftrexec */ - 193, /* fteread */ - 193, /* ftewrite */ - 193, /* fteexec */ - 198, /* ftis */ - 198, /* ftsize */ - 198, /* ftmtime */ - 198, /* ftatime */ - 198, /* ftctime */ - 198, /* ftrowned */ - 198, /* fteowned */ - 198, /* ftzero */ - 198, /* ftsock */ - 198, /* ftchr */ - 198, /* ftblk */ - 198, /* ftfile */ - 198, /* ftdir */ - 198, /* ftpipe */ - 198, /* ftsuid */ - 198, /* ftsgid */ - 198, /* ftsvtx */ - 198, /* ftlink */ - 198, /* fttty */ - 198, /* fttext */ - 198, /* ftbinary */ - 90, /* chdir */ - 90, /* chown */ + 196, /* ftrread */ + 196, /* ftrwrite */ + 196, /* ftrexec */ + 196, /* fteread */ + 196, /* ftewrite */ + 196, /* fteexec */ + 201, /* ftis */ + 201, /* ftsize */ + 201, /* ftmtime */ + 201, /* ftatime */ + 201, /* ftctime */ + 201, /* ftrowned */ + 201, /* fteowned */ + 201, /* ftzero */ + 201, /* ftsock */ + 201, /* ftchr */ + 201, /* ftblk */ + 201, /* ftfile */ + 201, /* ftdir */ + 201, /* ftpipe */ + 201, /* ftsuid */ + 201, /* ftsgid */ + 201, /* ftsvtx */ + 201, /* ftlink */ + 201, /* fttty */ + 201, /* fttext */ + 201, /* ftbinary */ + 93, /* chdir */ + 93, /* chown */ 75, /* chroot */ - 90, /* unlink */ - 90, /* chmod */ - 90, /* utime */ - 90, /* rename */ - 90, /* link */ - 90, /* symlink */ + 93, /* unlink */ + 93, /* chmod */ + 93, /* utime */ + 93, /* rename */ + 93, /* link */ + 93, /* symlink */ 0, /* readlink */ - 90, /* mkdir */ + 93, /* mkdir */ 75, /* rmdir */ 52, /* open_dir */ 0, /* readdir */ @@ -2757,22 +2759,22 @@ EXTCONST I16 PL_op_private_bitdef_ix[] = { 0, /* rewinddir */ 0, /* closedir */ -1, /* fork */ - 202, /* wait */ - 90, /* waitpid */ - 90, /* system */ - 90, /* exec */ - 90, /* kill */ - 202, /* getppid */ - 90, /* getpgrp */ - 90, /* setpgrp */ - 90, /* getpriority */ - 90, /* setpriority */ - 202, /* time */ + 205, /* wait */ + 93, /* waitpid */ + 93, /* system */ + 93, /* exec */ + 93, /* kill */ + 205, /* getppid */ + 93, /* getpgrp */ + 93, /* setpgrp */ + 93, /* getpriority */ + 93, /* setpriority */ + 205, /* time */ -1, /* tms */ 0, /* localtime */ 52, /* gmtime */ 0, /* alarm */ - 90, /* sleep */ + 93, /* sleep */ 52, /* shmget */ 52, /* shmctl */ 52, /* shmread */ @@ -2787,8 +2789,8 @@ EXTCONST I16 PL_op_private_bitdef_ix[] = { 0, /* require */ 0, /* dofile */ -1, /* hintseval */ - 203, /* entereval */ - 171, /* leaveeval */ + 206, /* entereval */ + 174, /* leaveeval */ 0, /* entertry */ -1, /* leavetry */ 0, /* ghbyname */ @@ -2826,18 +2828,18 @@ EXTCONST I16 PL_op_private_bitdef_ix[] = { 0, /* lock */ 0, /* once */ -1, /* custom */ - 209, /* coreargs */ - 213, /* avhvswitch */ + 212, /* coreargs */ + 216, /* avhvswitch */ 3, /* runcv */ 0, /* fc */ -1, /* padcv */ -1, /* introcv */ -1, /* clonecv */ - 215, /* padrange */ - 217, /* refassign */ - 223, /* lvref */ - 229, /* lvrefslice */ - 230, /* lvavref */ + 218, /* padrange */ + 220, /* refassign */ + 226, /* lvref */ + 232, /* lvrefslice */ + 233, /* lvavref */ 0, /* anonconst */ }; @@ -2858,74 +2860,75 @@ EXTCONST I16 PL_op_private_bitdef_ix[] = { EXTCONST U16 PL_op_private_bitdefs[] = { 0x0003, /* scalar, prototype, refgen, srefgen, readline, regcmaybe, regcreset, regcomp, substcont, chop, schop, defined, undef, study, preinc, i_preinc, predec, i_predec, postinc, i_postinc, postdec, i_postdec, negate, i_negate, not, complement, ucfirst, lcfirst, uc, lc, quotemeta, aeach, avalues, each, pop, shift, grepstart, mapstart, mapwhile, range, and, or, dor, andassign, orassign, dorassign, argcheck, argdefelem, method, method_named, method_super, method_redir, method_redir_super, enterwhereso, leavewhereso, untie, tied, dbmclose, getsockname, getpeername, lstat, stat, readlink, readdir, telldir, rewinddir, closedir, localtime, alarm, require, dofile, entertry, ghbyname, gnbyname, gpbyname, shostent, snetent, sprotoent, sservent, gpwnam, gpwuid, ggrnam, ggrgid, lock, once, fc, anonconst */ - 0x2ebc, 0x3fb9, /* pushmark */ + 0x2ebc, 0x4099, /* pushmark */ 0x00bd, /* wantarray, runcv */ - 0x0578, 0x1930, 0x406c, 0x3b28, 0x3305, /* const */ - 0x2ebc, 0x3459, /* gvsv */ + 0x0578, 0x1930, 0x414c, 0x3c08, 0x33e5, /* const */ + 0x2ebc, 0x3539, /* gvsv */ 0x1795, /* gv */ 0x0067, /* gelem, lt, i_lt, gt, i_gt, le, i_le, ge, i_ge, eq, i_eq, ne, i_ne, ncmp, i_ncmp, slt, sgt, sle, sge, seq, sne, scmp, bit_and, bit_xor, bit_or, sbit_and, sbit_xor, sbit_or, smartmatch, lslice, xor */ - 0x2ebc, 0x3fb8, 0x03d7, /* padsv */ - 0x2ebc, 0x3fb8, 0x06f4, 0x2fac, 0x3ca9, /* padav */ - 0x2ebc, 0x3fb8, 0x06f4, 0x0790, 0x2fac, 0x3ca8, 0x2a21, /* padhv */ - 0x2ebc, 0x1b18, 0x03d6, 0x2fac, 0x3228, 0x4064, 0x0003, /* rv2gv */ - 0x2ebc, 0x3458, 0x03d6, 0x4064, 0x0003, /* rv2sv */ + 0x2ebc, 0x4098, 0x03d7, /* padsv */ + 0x2ebc, 0x4098, 0x06f4, 0x2fac, 0x3d89, /* padav */ + 0x2ebc, 0x4098, 0x06f4, 0x0790, 0x2fac, 0x3d88, 0x2a21, /* padhv */ + 0x2ebc, 0x1b18, 0x03d6, 0x2fac, 0x3308, 0x4144, 0x0003, /* rv2gv */ + 0x2ebc, 0x3538, 0x03d6, 0x4144, 0x0003, /* rv2sv */ 0x2fac, 0x0003, /* av2arylen, akeys, values, keys */ - 0x319c, 0x0fd8, 0x0d34, 0x028c, 0x4368, 0x4064, 0x0003, /* rv2cv */ + 0x327c, 0x0fd8, 0x0d34, 0x028c, 0x4448, 0x4144, 0x0003, /* rv2cv */ 0x06f4, 0x0790, 0x0003, /* ref */ 0x018f, /* bless, glob, sprintf, formline, unpack, pack, join, anonlist, anonhash, splice, warn, die, reset, exit, close, pipe_op, fileno, umask, binmode, tie, dbmopen, sselect, select, getc, read, enterwrite, sysopen, sysseek, sysread, syswrite, eof, tell, seek, truncate, fcntl, ioctl, send, recv, socket, sockpair, bind, connect, listen, accept, shutdown, gsockopt, ssockopt, open_dir, seekdir, gmtime, shmget, shmctl, shmread, shmwrite, msgget, msgctl, msgsnd, msgrcv, semop, semget, semctl, ghbyaddr, gnbyaddr, gpbynumber, gsbyname, gsbyport, syscall */ - 0x363c, 0x3558, 0x2774, 0x26b0, 0x0003, /* backtick */ + 0x371c, 0x3638, 0x2774, 0x26b0, 0x0003, /* backtick */ 0x06f5, /* subst */ - 0x105c, 0x2098, 0x0914, 0x3dec, 0x2428, 0x01e4, 0x0141, /* trans, transr */ + 0x105c, 0x2098, 0x0914, 0x3ecc, 0x2428, 0x01e4, 0x0141, /* trans, transr */ 0x0f1c, 0x0618, 0x0067, /* sassign */ 0x0bd8, 0x0ad4, 0x09d0, 0x2fac, 0x06e8, 0x0067, /* aassign */ - 0x4410, 0x0003, /* chomp, schomp, ncomplement, scomplement, sin, cos, exp, log, sqrt, int, hex, oct, abs, ord, chr, chroot, rmdir */ + 0x44f0, 0x0003, /* chomp, schomp, ncomplement, scomplement, sin, cos, exp, log, sqrt, int, hex, oct, abs, ord, chr, chroot, rmdir */ 0x06f4, 0x2fac, 0x0003, /* pos */ - 0x4410, 0x0067, /* pow, multiply, i_multiply, divide, i_divide, modulo, i_modulo, add, i_add, subtract, i_subtract, concat, left_shift, right_shift, nbit_and, nbit_xor, nbit_or */ + 0x44f0, 0x0067, /* pow, multiply, i_multiply, divide, i_divide, modulo, i_modulo, add, i_add, subtract, i_subtract, left_shift, right_shift, nbit_and, nbit_xor, nbit_or */ 0x1418, 0x0067, /* repeat */ - 0x2ebc, 0x0358, 0x1b14, 0x4410, 0x414c, 0x0003, /* multiconcat */ - 0x4410, 0x018f, /* stringify, atan2, rand, srand, crypt, push, unshift, flock, chdir, chown, unlink, chmod, utime, rename, link, symlink, mkdir, waitpid, system, exec, kill, getpgrp, setpgrp, getpriority, setpriority, sleep */ - 0x06f4, 0x4410, 0x0003, /* length */ - 0x3890, 0x2fac, 0x012b, /* substr */ + 0x3198, 0x44f0, 0x0067, /* concat */ + 0x2ebc, 0x0358, 0x1b14, 0x44f0, 0x422c, 0x0003, /* multiconcat */ + 0x44f0, 0x018f, /* stringify, atan2, rand, srand, crypt, push, unshift, flock, chdir, chown, unlink, chmod, utime, rename, link, symlink, mkdir, waitpid, system, exec, kill, getpgrp, setpgrp, getpriority, setpriority, sleep */ + 0x06f4, 0x44f0, 0x0003, /* length */ + 0x3970, 0x2fac, 0x012b, /* substr */ 0x2fac, 0x0067, /* vec */ - 0x3118, 0x06f4, 0x4410, 0x018f, /* index, rindex */ - 0x2ebc, 0x3458, 0x06f4, 0x2fac, 0x3ca8, 0x4064, 0x0003, /* rv2av */ + 0x3118, 0x06f4, 0x44f0, 0x018f, /* index, rindex */ + 0x2ebc, 0x3538, 0x06f4, 0x2fac, 0x3d88, 0x4144, 0x0003, /* rv2av */ 0x025f, /* aelemfast, aelemfast_lex */ 0x2ebc, 0x2db8, 0x03d6, 0x2fac, 0x0067, /* aelem, helem */ - 0x2ebc, 0x2fac, 0x3ca9, /* aslice, hslice */ + 0x2ebc, 0x2fac, 0x3d89, /* aslice, hslice */ 0x2fad, /* kvaslice, kvhslice */ - 0x2ebc, 0x3bf8, 0x2ad4, 0x0003, /* delete */ - 0x4298, 0x0003, /* exists */ - 0x2ebc, 0x3458, 0x06f4, 0x0790, 0x2fac, 0x3ca8, 0x4064, 0x2a21, /* rv2hv */ - 0x2ebc, 0x2db8, 0x10d4, 0x1a30, 0x2fac, 0x4064, 0x0003, /* multideref */ - 0x2ebc, 0x3458, 0x0430, 0x2bcc, 0x24e9, /* split */ + 0x2ebc, 0x3cd8, 0x2ad4, 0x0003, /* delete */ + 0x4378, 0x0003, /* exists */ + 0x2ebc, 0x3538, 0x06f4, 0x0790, 0x2fac, 0x3d88, 0x4144, 0x2a21, /* rv2hv */ + 0x2ebc, 0x2db8, 0x10d4, 0x1a30, 0x2fac, 0x4144, 0x0003, /* multideref */ + 0x2ebc, 0x3538, 0x0430, 0x2bcc, 0x24e9, /* split */ 0x2ebc, 0x2159, /* list */ - 0x457c, 0x3ed8, 0x1370, 0x280c, 0x3988, 0x2904, 0x33c1, /* sort */ + 0x465c, 0x3fb8, 0x1370, 0x280c, 0x3a68, 0x2904, 0x34a1, /* sort */ 0x280c, 0x0003, /* reverse */ 0x06f4, 0x0003, /* grepwhile */ 0x2c58, 0x0003, /* flip, flop */ 0x2ebc, 0x0003, /* cond_expr */ - 0x2ebc, 0x0fd8, 0x03d6, 0x028c, 0x4368, 0x4064, 0x25c1, /* entersub */ - 0x36f8, 0x0003, /* leavesub, leavesublv, leavewrite, leaveeval */ + 0x2ebc, 0x0fd8, 0x03d6, 0x028c, 0x4448, 0x4144, 0x25c1, /* entersub */ + 0x37d8, 0x0003, /* leavesub, leavesublv, leavewrite, leaveeval */ 0x02aa, 0x0003, /* argelem */ 0x00bc, 0x018f, /* caller */ 0x2335, /* nextstate, dbstate */ - 0x2d5c, 0x36f9, /* leave */ - 0x2ebc, 0x3458, 0x3a05, /* enteriter */ - 0x3a05, /* iter */ + 0x2d5c, 0x37d9, /* leave */ + 0x2ebc, 0x3538, 0x3ae5, /* enteriter */ + 0x3ae5, /* iter */ 0x2d5c, 0x0067, /* leaveloop */ - 0x469c, 0x0003, /* last, next, redo, dump, goto */ - 0x363c, 0x3558, 0x2774, 0x26b0, 0x018f, /* open */ + 0x477c, 0x0003, /* last, next, redo, dump, goto */ + 0x371c, 0x3638, 0x2774, 0x26b0, 0x018f, /* open */ 0x1cd0, 0x1f2c, 0x1de8, 0x1ba4, 0x0003, /* ftrread, ftrwrite, ftrexec, fteread, ftewrite, fteexec */ 0x1cd0, 0x1f2c, 0x1de8, 0x0003, /* ftis, ftsize, ftmtime, ftatime, ftctime, ftrowned, fteowned, ftzero, ftsock, ftchr, ftblk, ftfile, ftdir, ftpipe, ftsuid, ftsgid, ftsvtx, ftlink, fttty, fttext, ftbinary */ - 0x4411, /* wait, getppid, time */ - 0x3794, 0x0df0, 0x084c, 0x44e8, 0x2244, 0x0003, /* entereval */ + 0x44f1, /* wait, getppid, time */ + 0x3874, 0x0df0, 0x084c, 0x45c8, 0x2244, 0x0003, /* entereval */ 0x307c, 0x0018, 0x1284, 0x11a1, /* coreargs */ 0x2fac, 0x00c7, /* avhvswitch */ 0x2ebc, 0x01fb, /* padrange */ - 0x2ebc, 0x3fb8, 0x04f6, 0x298c, 0x1888, 0x0067, /* refassign */ - 0x2ebc, 0x3fb8, 0x04f6, 0x298c, 0x1888, 0x0003, /* lvref */ + 0x2ebc, 0x4098, 0x04f6, 0x298c, 0x1888, 0x0067, /* refassign */ + 0x2ebc, 0x4098, 0x04f6, 0x298c, 0x1888, 0x0003, /* lvref */ 0x2ebd, /* lvrefslice */ - 0x2ebc, 0x3fb8, 0x0003, /* lvavref */ + 0x2ebc, 0x4098, 0x0003, /* lvavref */ }; @@ -3000,7 +3003,7 @@ EXTCONST U8 PL_op_private_valid[] = { /* I_ADD */ (OPpARG2_MASK|OPpTARGET_MY), /* SUBTRACT */ (OPpARG2_MASK|OPpTARGET_MY), /* I_SUBTRACT */ (OPpARG2_MASK|OPpTARGET_MY), - /* CONCAT */ (OPpARG2_MASK|OPpTARGET_MY), + /* CONCAT */ (OPpARG2_MASK|OPpTARGET_MY|OPpCONCAT_NESTED), /* MULTICONCAT */ (OPpARG1_MASK|OPpMULTICONCAT_STRINGIFY|OPpTARGET_MY|OPpMULTICONCAT_FAKE|OPpMULTICONCAT_APPEND|OPpLVAL_INTRO), /* STRINGIFY */ (OPpARG4_MASK|OPpTARGET_MY), /* LEFT_SHIFT */ (OPpARG2_MASK|OPpTARGET_MY), |