"subtract",
"i_subtract",
"concat",
+ "multiconcat",
"stringify",
"left_shift",
"right_shift",
"andassign",
"orassign",
"dorassign",
- "method",
"entersub",
"leavesub",
"leavesublv",
"dump",
"goto",
"exit",
+ "method",
"method_named",
"method_super",
"method_redir",
"subtraction (-)",
"integer subtraction (-)",
"concatenation (.) or string",
+ "concatenation (.) or string",
"string",
"left bitshift (<<)",
"right bitshift (>>)",
"logical and assignment (&&=)",
"logical or assignment (||=)",
"defined or assignment (//=)",
- "method lookup",
"subroutine entry",
"subroutine exit",
"lvalue subroutine return",
"dump",
"goto",
"exit",
+ "method lookup",
"method with known name",
"super with known name",
"redirect method with known name",
#ifdef PERL_GLOBAL_STRUCT_INIT
# define PERL_PPADDR_INITED
static const Perl_ppaddr_t Gppaddr[]
-#else
-# ifndef PERL_GLOBAL_STRUCT
-# define PERL_PPADDR_INITED
+#elif !defined(PERL_GLOBAL_STRUCT)
+# define PERL_PPADDR_INITED
EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
-# endif
#endif /* PERL_GLOBAL_STRUCT */
#if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT)
# define PERL_PPADDR_INITED
Perl_pp_subtract,
Perl_pp_i_subtract,
Perl_pp_concat,
+ Perl_pp_multiconcat,
Perl_pp_stringify,
Perl_pp_left_shift,
Perl_pp_right_shift,
Perl_pp_andassign, /* implemented by Perl_pp_and */
Perl_pp_orassign, /* implemented by Perl_pp_or */
Perl_pp_dorassign, /* implemented by Perl_pp_defined */
- Perl_pp_method,
Perl_pp_entersub,
Perl_pp_leavesub,
Perl_pp_leavesublv,
Perl_pp_dump, /* implemented by Perl_pp_goto */
Perl_pp_goto,
Perl_pp_exit,
+ Perl_pp_method,
Perl_pp_method_named,
Perl_pp_method_super,
Perl_pp_method_redir,
#ifdef PERL_GLOBAL_STRUCT_INIT
# define PERL_CHECK_INITED
static const Perl_check_t Gcheck[]
-#else
-# ifndef PERL_GLOBAL_STRUCT
-# define PERL_CHECK_INITED
+#elif !defined(PERL_GLOBAL_STRUCT)
+# define PERL_CHECK_INITED
EXT Perl_check_t PL_check[] /* or perlvars.h */
-# endif
#endif
#if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT)
# define PERL_CHECK_INITED
Perl_ck_null, /* subtract */
Perl_ck_null, /* i_subtract */
Perl_ck_concat, /* concat */
+ Perl_ck_null, /* multiconcat */
Perl_ck_stringify, /* stringify */
Perl_ck_bitop, /* left_shift */
Perl_ck_bitop, /* right_shift */
Perl_ck_cmp, /* i_le */
Perl_ck_cmp, /* ge */
Perl_ck_cmp, /* i_ge */
- Perl_ck_null, /* eq */
- Perl_ck_null, /* i_eq */
- Perl_ck_null, /* ne */
- Perl_ck_null, /* i_ne */
+ Perl_ck_cmp, /* eq */
+ Perl_ck_cmp, /* i_eq */
+ Perl_ck_cmp, /* ne */
+ Perl_ck_cmp, /* i_ne */
Perl_ck_null, /* ncmp */
Perl_ck_null, /* i_ncmp */
Perl_ck_null, /* slt */
Perl_ck_null, /* not */
Perl_ck_bitop, /* complement */
Perl_ck_bitop, /* ncomplement */
- Perl_ck_bitop, /* scomplement */
+ Perl_ck_null, /* scomplement */
Perl_ck_smartmatch, /* smartmatch */
Perl_ck_fun, /* atan2 */
Perl_ck_fun, /* sin */
Perl_ck_null, /* andassign */
Perl_ck_null, /* orassign */
Perl_ck_null, /* dorassign */
- Perl_ck_method, /* method */
Perl_ck_subr, /* entersub */
Perl_ck_null, /* leavesub */
Perl_ck_null, /* leavesublv */
Perl_ck_null, /* dump */
Perl_ck_null, /* goto */
Perl_ck_fun, /* exit */
+ Perl_ck_method, /* method */
Perl_ck_null, /* method_named */
Perl_ck_null, /* method_super */
Perl_ck_null, /* method_redir */
0x0001123e, /* subtract */
0x0001121e, /* i_subtract */
0x0001121e, /* concat */
+ 0x00000f1c, /* multiconcat */
0x0000141e, /* stringify */
0x0001121e, /* left_shift */
0x0001121e, /* right_shift */
0x00004b08, /* keys */
0x00001b00, /* delete */
0x00001b04, /* exists */
- 0x00000140, /* rv2hv */
+ 0x00000148, /* rv2hv */
0x00014204, /* helem */
0x00024401, /* hslice */
0x00024401, /* kvhslice */
0x00000304, /* andassign */
0x00000304, /* orassign */
0x00000304, /* dorassign */
- 0x00000e40, /* method */
0x00002141, /* entersub */
0x00000100, /* leavesub */
0x00000100, /* leavesublv */
0x00000d44, /* dump */
0x00000d04, /* goto */
0x00009b04, /* exit */
+ 0x00000e40, /* method */
0x00000e40, /* method_named */
0x00000e40, /* method_super */
0x00000e40, /* method_redir */
#define OPpARG2_MASK 0x03
#define OPpAVHVSWITCH_MASK 0x03
#define OPpARGELEM_HV 0x04
+#define OPpASSIGN_TRUEBOOL 0x04
#define OPpCONST_SHORTCIRCUIT 0x04
#define OPpDONT_INIT_GV 0x04
#define OPpENTERSUB_HASTARG 0x04
#define OPpITER_DEF 0x08
#define OPpLVREF_ITER 0x08
#define OPpMAYBE_LVSUB 0x08
+#define OPpMULTICONCAT_STRINGIFY 0x08
#define OPpREVERSE_INPLACE 0x08
#define OPpSORT_INPLACE 0x08
#define OPpSPLIT_LEX 0x08
#define OPpKVSLICE 0x20
#define OPpLVREF_HV 0x20
#define OPpMAY_RETURN_CONSTANT 0x20
+#define OPpMULTICONCAT_FAKE 0x20
#define OPpMULTIDEREF_DELETE 0x20
#define OPpOPEN_IN_CRLF 0x20
-#define OPpSORT_QSORT 0x20
#define OPpTRANS_COMPLEMENT 0x20
#define OPpTRUEBOOL 0x20
#define OPpDEREF 0x30
#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
#define OPpEXISTS_SUB 0x40
#define OPpFLIP_LINENUM 0x40
+#define OPpINDEX_BOOLNEG 0x40
#define OPpLIST_GUESSED 0x40
#define OPpLVAL_DEFER 0x40
+#define OPpMULTICONCAT_APPEND 0x40
#define OPpOPEN_OUT_RAW 0x40
#define OPpOUR_INTRO 0x40
#define OPpPAD_STATE 0x40
#define OPpOFFBYONE 0x80
#define OPpOPEN_OUT_CRLF 0x80
#define OPpPV_IS_UTF8 0x80
+#define OPpSORT_UNSTABLE 0x80
#define OPpTRANS_DELETE 0x80
START_EXTERN_C
'<','U','T','F','\0',
'>','U','T','F','\0',
'A','M','P','E','R','\0',
+ 'A','P','P','E','N','D','\0',
'A','S','S','I','G','N','\0',
'A','V','\0',
'B','A','R','E','\0',
'L','V','I','N','T','R','O','\0',
'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',
'O','U','R','I','N','T','R','\0',
'O','U','T','B','I','N','\0',
'O','U','T','C','R','\0',
- 'Q','S','O','R','T','\0',
'R','E','F','C','\0',
'R','E','P','A','R','S','E','\0',
'R','E','P','L','1','S','T','\0',
'S','T','A','B','L','E','\0',
'S','T','A','T','E','\0',
'S','T','R','I','C','T','\0',
+ 'S','T','R','I','N','G','I','F','Y','\0',
'S','U','B','\0',
'S','V','\0',
'T','A','R','G','\0',
'T','A','R','G','M','Y','\0',
'U','N','I','\0',
+ 'U','N','S','T','A','B','L','E','\0',
'U','T','F','\0',
'k','e','y','\0',
'o','f','f','s','e','t','\0',
EXTCONST I16 PL_op_private_bitfields[] = {
0, 8, -1,
0, 8, -1,
- 0, 552, -1,
+ 0, 583, -1,
0, 8, -1,
0, 8, -1,
- 0, 559, -1,
- 0, 548, -1,
- 1, -1, 0, 525, 1, 33, 2, 283, -1,
- 4, -1, 1, 164, 2, 171, 3, 178, -1,
- 4, -1, 0, 525, 1, 33, 2, 283, 3, 110, -1,
+ 0, 590, -1,
+ 0, 579, -1,
+ 1, -1, 0, 547, 1, 40, 2, 290, -1,
+ 4, -1, 1, 171, 2, 178, 3, 185, -1,
+ 4, -1, 0, 547, 1, 40, 2, 290, 3, 117, -1,
};
12, /* gelem */
13, /* padsv */
16, /* padav */
- 20, /* padhv */
+ 21, /* padhv */
-1, /* padany */
- 27, /* rv2gv */
- 34, /* rv2sv */
- 39, /* av2arylen */
- 41, /* rv2cv */
+ 28, /* rv2gv */
+ 35, /* rv2sv */
+ 40, /* av2arylen */
+ 42, /* rv2cv */
-1, /* anoncode */
0, /* prototype */
0, /* refgen */
0, /* srefgen */
- 48, /* ref */
- 51, /* bless */
- 52, /* backtick */
- 51, /* glob */
+ 49, /* ref */
+ 52, /* bless */
+ 53, /* backtick */
+ 52, /* glob */
0, /* readline */
-1, /* rcatline */
0, /* regcmaybe */
0, /* regcomp */
-1, /* match */
-1, /* qr */
- -1, /* subst */
+ 58, /* subst */
0, /* substcont */
- 57, /* trans */
- 57, /* transr */
- 64, /* sassign */
- 67, /* aassign */
+ 59, /* trans */
+ 59, /* transr */
+ 66, /* sassign */
+ 69, /* aassign */
0, /* chop */
0, /* schop */
- 72, /* chomp */
- 72, /* schomp */
+ 75, /* chomp */
+ 75, /* schomp */
0, /* defined */
0, /* undef */
0, /* study */
- 39, /* pos */
+ 77, /* pos */
0, /* preinc */
0, /* i_preinc */
0, /* predec */
0, /* i_postinc */
0, /* postdec */
0, /* i_postdec */
- 74, /* pow */
- 74, /* multiply */
- 74, /* i_multiply */
- 74, /* divide */
- 74, /* i_divide */
- 74, /* modulo */
- 74, /* i_modulo */
- 76, /* repeat */
- 74, /* add */
- 74, /* i_add */
- 74, /* subtract */
- 74, /* i_subtract */
- 74, /* concat */
- 78, /* stringify */
- 74, /* left_shift */
- 74, /* right_shift */
+ 80, /* pow */
+ 80, /* multiply */
+ 80, /* i_multiply */
+ 80, /* divide */
+ 80, /* i_divide */
+ 80, /* modulo */
+ 80, /* i_modulo */
+ 82, /* repeat */
+ 80, /* add */
+ 80, /* i_add */
+ 80, /* subtract */
+ 80, /* i_subtract */
+ 84, /* concat */
+ 87, /* multiconcat */
+ 93, /* stringify */
+ 80, /* left_shift */
+ 80, /* right_shift */
12, /* lt */
12, /* i_lt */
12, /* gt */
12, /* bit_and */
12, /* bit_xor */
12, /* bit_or */
- 74, /* nbit_and */
- 74, /* nbit_xor */
- 74, /* nbit_or */
+ 80, /* nbit_and */
+ 80, /* nbit_xor */
+ 80, /* nbit_or */
12, /* sbit_and */
12, /* sbit_xor */
12, /* sbit_or */
0, /* i_negate */
0, /* not */
0, /* complement */
- 72, /* ncomplement */
- 72, /* scomplement */
+ 75, /* ncomplement */
+ 75, /* scomplement */
12, /* smartmatch */
- 78, /* atan2 */
- 72, /* sin */
- 72, /* cos */
- 78, /* rand */
- 78, /* srand */
- 72, /* exp */
- 72, /* log */
- 72, /* sqrt */
- 72, /* int */
- 72, /* hex */
- 72, /* oct */
- 72, /* abs */
- 72, /* length */
- 80, /* substr */
- 83, /* vec */
- 78, /* index */
- 78, /* rindex */
- 51, /* sprintf */
- 51, /* formline */
- 72, /* ord */
- 72, /* chr */
- 78, /* crypt */
+ 93, /* atan2 */
+ 75, /* sin */
+ 75, /* cos */
+ 93, /* rand */
+ 93, /* srand */
+ 75, /* exp */
+ 75, /* log */
+ 75, /* sqrt */
+ 75, /* int */
+ 75, /* hex */
+ 75, /* oct */
+ 75, /* abs */
+ 95, /* length */
+ 98, /* substr */
+ 101, /* vec */
+ 103, /* index */
+ 103, /* rindex */
+ 52, /* sprintf */
+ 52, /* formline */
+ 75, /* ord */
+ 75, /* chr */
+ 93, /* crypt */
0, /* ucfirst */
0, /* lcfirst */
0, /* uc */
0, /* lc */
0, /* quotemeta */
- 85, /* rv2av */
- 91, /* aelemfast */
- 91, /* aelemfast_lex */
- 92, /* aelem */
- 97, /* aslice */
- 100, /* kvaslice */
+ 107, /* rv2av */
+ 114, /* aelemfast */
+ 114, /* aelemfast_lex */
+ 115, /* aelem */
+ 120, /* aslice */
+ 123, /* kvaslice */
0, /* aeach */
0, /* avalues */
- 39, /* akeys */
+ 40, /* akeys */
0, /* each */
- 39, /* values */
- 39, /* keys */
- 101, /* delete */
- 105, /* exists */
- 107, /* rv2hv */
- 92, /* helem */
- 97, /* hslice */
- 100, /* kvhslice */
- 115, /* multideref */
- 51, /* unpack */
- 51, /* pack */
- 122, /* split */
- 51, /* join */
- 127, /* list */
+ 40, /* values */
+ 40, /* keys */
+ 124, /* delete */
+ 128, /* exists */
+ 130, /* rv2hv */
+ 115, /* helem */
+ 120, /* hslice */
+ 123, /* kvhslice */
+ 138, /* multideref */
+ 52, /* unpack */
+ 52, /* pack */
+ 145, /* split */
+ 52, /* join */
+ 150, /* list */
12, /* lslice */
- 51, /* anonlist */
- 51, /* anonhash */
- 51, /* splice */
- 78, /* push */
+ 52, /* anonlist */
+ 52, /* anonhash */
+ 52, /* splice */
+ 93, /* push */
0, /* pop */
0, /* shift */
- 78, /* unshift */
- 129, /* sort */
- 136, /* reverse */
+ 93, /* unshift */
+ 152, /* sort */
+ 159, /* reverse */
0, /* grepstart */
- 0, /* grepwhile */
+ 161, /* grepwhile */
0, /* mapstart */
0, /* mapwhile */
0, /* range */
- 138, /* flip */
- 138, /* flop */
+ 163, /* flip */
+ 163, /* flop */
0, /* and */
0, /* or */
12, /* xor */
0, /* dor */
- 140, /* cond_expr */
+ 165, /* cond_expr */
0, /* andassign */
0, /* orassign */
0, /* dorassign */
- 0, /* method */
- 142, /* entersub */
- 149, /* leavesub */
- 149, /* leavesublv */
+ 167, /* entersub */
+ 174, /* leavesub */
+ 174, /* leavesublv */
0, /* argcheck */
- 151, /* argelem */
+ 176, /* argelem */
0, /* argdefelem */
- 153, /* caller */
- 51, /* warn */
- 51, /* die */
- 51, /* reset */
+ 178, /* caller */
+ 52, /* warn */
+ 52, /* die */
+ 52, /* reset */
-1, /* lineseq */
- 155, /* nextstate */
- 155, /* dbstate */
+ 180, /* nextstate */
+ 180, /* dbstate */
-1, /* unstack */
-1, /* enter */
- 156, /* leave */
+ 181, /* leave */
-1, /* scope */
- 158, /* enteriter */
- 162, /* iter */
+ 183, /* enteriter */
+ 187, /* iter */
-1, /* enterloop */
- 163, /* leaveloop */
+ 188, /* leaveloop */
-1, /* return */
- 165, /* last */
- 165, /* next */
- 165, /* redo */
- 165, /* dump */
- 165, /* goto */
- 51, /* exit */
+ 190, /* last */
+ 190, /* next */
+ 190, /* redo */
+ 190, /* dump */
+ 190, /* goto */
+ 52, /* exit */
+ 0, /* method */
0, /* method_named */
0, /* method_super */
0, /* method_redir */
0, /* leavewhen */
-1, /* break */
-1, /* continue */
- 167, /* open */
- 51, /* close */
- 51, /* pipe_op */
- 51, /* fileno */
- 51, /* umask */
- 51, /* binmode */
- 51, /* tie */
+ 192, /* open */
+ 52, /* close */
+ 52, /* pipe_op */
+ 52, /* fileno */
+ 52, /* umask */
+ 52, /* binmode */
+ 52, /* tie */
0, /* untie */
0, /* tied */
- 51, /* dbmopen */
+ 52, /* dbmopen */
0, /* dbmclose */
- 51, /* sselect */
- 51, /* select */
- 51, /* getc */
- 51, /* read */
- 51, /* enterwrite */
- 149, /* leavewrite */
+ 52, /* sselect */
+ 52, /* select */
+ 52, /* getc */
+ 52, /* read */
+ 52, /* enterwrite */
+ 174, /* leavewrite */
-1, /* prtf */
-1, /* print */
-1, /* say */
- 51, /* sysopen */
- 51, /* sysseek */
- 51, /* sysread */
- 51, /* syswrite */
- 51, /* eof */
- 51, /* tell */
- 51, /* seek */
- 51, /* truncate */
- 51, /* fcntl */
- 51, /* ioctl */
- 78, /* flock */
- 51, /* send */
- 51, /* recv */
- 51, /* socket */
- 51, /* sockpair */
- 51, /* bind */
- 51, /* connect */
- 51, /* listen */
- 51, /* accept */
- 51, /* shutdown */
- 51, /* gsockopt */
- 51, /* ssockopt */
+ 52, /* sysopen */
+ 52, /* sysseek */
+ 52, /* sysread */
+ 52, /* syswrite */
+ 52, /* eof */
+ 52, /* tell */
+ 52, /* seek */
+ 52, /* truncate */
+ 52, /* fcntl */
+ 52, /* ioctl */
+ 93, /* flock */
+ 52, /* send */
+ 52, /* recv */
+ 52, /* socket */
+ 52, /* sockpair */
+ 52, /* bind */
+ 52, /* connect */
+ 52, /* listen */
+ 52, /* accept */
+ 52, /* shutdown */
+ 52, /* gsockopt */
+ 52, /* ssockopt */
0, /* getsockname */
0, /* getpeername */
0, /* lstat */
0, /* stat */
- 172, /* ftrread */
- 172, /* ftrwrite */
- 172, /* ftrexec */
- 172, /* fteread */
- 172, /* ftewrite */
- 172, /* fteexec */
- 177, /* ftis */
- 177, /* ftsize */
- 177, /* ftmtime */
- 177, /* ftatime */
- 177, /* ftctime */
- 177, /* ftrowned */
- 177, /* fteowned */
- 177, /* ftzero */
- 177, /* ftsock */
- 177, /* ftchr */
- 177, /* ftblk */
- 177, /* ftfile */
- 177, /* ftdir */
- 177, /* ftpipe */
- 177, /* ftsuid */
- 177, /* ftsgid */
- 177, /* ftsvtx */
- 177, /* ftlink */
- 177, /* fttty */
- 177, /* fttext */
- 177, /* ftbinary */
- 78, /* chdir */
- 78, /* chown */
- 72, /* chroot */
- 78, /* unlink */
- 78, /* chmod */
- 78, /* utime */
- 78, /* rename */
- 78, /* link */
- 78, /* symlink */
+ 197, /* ftrread */
+ 197, /* ftrwrite */
+ 197, /* ftrexec */
+ 197, /* fteread */
+ 197, /* ftewrite */
+ 197, /* fteexec */
+ 202, /* ftis */
+ 202, /* ftsize */
+ 202, /* ftmtime */
+ 202, /* ftatime */
+ 202, /* ftctime */
+ 202, /* ftrowned */
+ 202, /* fteowned */
+ 202, /* ftzero */
+ 202, /* ftsock */
+ 202, /* ftchr */
+ 202, /* ftblk */
+ 202, /* ftfile */
+ 202, /* ftdir */
+ 202, /* ftpipe */
+ 202, /* ftsuid */
+ 202, /* ftsgid */
+ 202, /* ftsvtx */
+ 202, /* ftlink */
+ 202, /* fttty */
+ 202, /* fttext */
+ 202, /* ftbinary */
+ 93, /* chdir */
+ 93, /* chown */
+ 75, /* chroot */
+ 93, /* unlink */
+ 93, /* chmod */
+ 93, /* utime */
+ 93, /* rename */
+ 93, /* link */
+ 93, /* symlink */
0, /* readlink */
- 78, /* mkdir */
- 72, /* rmdir */
- 51, /* open_dir */
+ 93, /* mkdir */
+ 75, /* rmdir */
+ 52, /* open_dir */
0, /* readdir */
0, /* telldir */
- 51, /* seekdir */
+ 52, /* seekdir */
0, /* rewinddir */
0, /* closedir */
-1, /* fork */
- 181, /* wait */
- 78, /* waitpid */
- 78, /* system */
- 78, /* exec */
- 78, /* kill */
- 181, /* getppid */
- 78, /* getpgrp */
- 78, /* setpgrp */
- 78, /* getpriority */
- 78, /* setpriority */
- 181, /* time */
+ 206, /* wait */
+ 93, /* waitpid */
+ 93, /* system */
+ 93, /* exec */
+ 93, /* kill */
+ 206, /* getppid */
+ 93, /* getpgrp */
+ 93, /* setpgrp */
+ 93, /* getpriority */
+ 93, /* setpriority */
+ 206, /* time */
-1, /* tms */
0, /* localtime */
- 51, /* gmtime */
+ 52, /* gmtime */
0, /* alarm */
- 78, /* sleep */
- 51, /* shmget */
- 51, /* shmctl */
- 51, /* shmread */
- 51, /* shmwrite */
- 51, /* msgget */
- 51, /* msgctl */
- 51, /* msgsnd */
- 51, /* msgrcv */
- 51, /* semop */
- 51, /* semget */
- 51, /* semctl */
+ 93, /* sleep */
+ 52, /* shmget */
+ 52, /* shmctl */
+ 52, /* shmread */
+ 52, /* shmwrite */
+ 52, /* msgget */
+ 52, /* msgctl */
+ 52, /* msgsnd */
+ 52, /* msgrcv */
+ 52, /* semop */
+ 52, /* semget */
+ 52, /* semctl */
0, /* require */
0, /* dofile */
-1, /* hintseval */
- 182, /* entereval */
- 149, /* leaveeval */
+ 207, /* entereval */
+ 174, /* leaveeval */
0, /* entertry */
-1, /* leavetry */
0, /* ghbyname */
- 51, /* ghbyaddr */
+ 52, /* ghbyaddr */
-1, /* ghostent */
0, /* gnbyname */
- 51, /* gnbyaddr */
+ 52, /* gnbyaddr */
-1, /* gnetent */
0, /* gpbyname */
- 51, /* gpbynumber */
+ 52, /* gpbynumber */
-1, /* gprotoent */
- 51, /* gsbyname */
- 51, /* gsbyport */
+ 52, /* gsbyname */
+ 52, /* gsbyport */
-1, /* gservent */
0, /* shostent */
0, /* snetent */
-1, /* sgrent */
-1, /* egrent */
-1, /* getlogin */
- 51, /* syscall */
+ 52, /* syscall */
0, /* lock */
0, /* once */
-1, /* custom */
- 188, /* coreargs */
- 192, /* avhvswitch */
+ 213, /* coreargs */
+ 217, /* avhvswitch */
3, /* runcv */
0, /* fc */
-1, /* padcv */
-1, /* introcv */
-1, /* clonecv */
- 194, /* padrange */
- 196, /* refassign */
- 202, /* lvref */
- 208, /* lvrefslice */
- 209, /* lvavref */
+ 219, /* padrange */
+ 221, /* refassign */
+ 227, /* lvref */
+ 233, /* lvrefslice */
+ 234, /* lvavref */
0, /* anonconst */
};
*/
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, grepwhile, mapstart, mapwhile, range, and, or, dor, andassign, orassign, dorassign, method, argcheck, argdefelem, method_named, method_super, method_redir, method_redir_super, entergiven, leavegiven, enterwhen, leavewhen, 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 */
- 0x2e5c, 0x3f99, /* pushmark */
+ 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, entergiven, leavegiven, enterwhen, leavewhen, 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 */
+ 0x2f3c, 0x4119, /* pushmark */
0x00bd, /* wantarray, runcv */
- 0x0498, 0x18d0, 0x404c, 0x3b08, 0x3225, /* const */
- 0x2e5c, 0x3379, /* gvsv */
- 0x1735, /* gv */
+ 0x0578, 0x19b0, 0x41cc, 0x3c88, 0x3465, /* const */
+ 0x2f3c, 0x35b9, /* gvsv */
+ 0x1815, /* 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 */
- 0x2e5c, 0x3f98, 0x03d7, /* padsv */
- 0x2e5c, 0x3f98, 0x2f4c, 0x3c89, /* padav */
- 0x2e5c, 0x3f98, 0x0614, 0x06b0, 0x2f4c, 0x3c88, 0x29c1, /* padhv */
- 0x2e5c, 0x1ab8, 0x03d6, 0x2f4c, 0x3148, 0x4044, 0x0003, /* rv2gv */
- 0x2e5c, 0x3378, 0x03d6, 0x4044, 0x0003, /* rv2sv */
- 0x2f4c, 0x0003, /* av2arylen, pos, akeys, values, keys */
- 0x30bc, 0x0ef8, 0x0c54, 0x028c, 0x4208, 0x4044, 0x0003, /* rv2cv */
- 0x0614, 0x06b0, 0x0003, /* ref */
+ 0x2f3c, 0x4118, 0x03d7, /* padsv */
+ 0x2f3c, 0x4118, 0x06f4, 0x302c, 0x3e09, /* padav */
+ 0x2f3c, 0x4118, 0x06f4, 0x0790, 0x302c, 0x3e08, 0x2aa1, /* padhv */
+ 0x2f3c, 0x1b98, 0x03d6, 0x302c, 0x3388, 0x41c4, 0x0003, /* rv2gv */
+ 0x2f3c, 0x35b8, 0x03d6, 0x41c4, 0x0003, /* rv2sv */
+ 0x302c, 0x0003, /* av2arylen, akeys, values, keys */
+ 0x32fc, 0x0fd8, 0x0d34, 0x028c, 0x44c8, 0x41c4, 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 */
- 0x355c, 0x3478, 0x2714, 0x2650, 0x0003, /* backtick */
- 0x0ffc, 0x2038, 0x0834, 0x3dcc, 0x23c8, 0x01e4, 0x0141, /* trans, transr */
- 0x0e3c, 0x0538, 0x0067, /* sassign */
- 0x0af8, 0x09f4, 0x08f0, 0x2f4c, 0x0067, /* aassign */
- 0x42b0, 0x0003, /* chomp, schomp, ncomplement, scomplement, sin, cos, exp, log, sqrt, int, hex, oct, abs, length, ord, chr, chroot, rmdir */
- 0x42b0, 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 */
- 0x13b8, 0x0067, /* repeat */
- 0x42b0, 0x018f, /* stringify, atan2, rand, srand, index, rindex, crypt, push, unshift, flock, chdir, chown, unlink, chmod, utime, rename, link, symlink, mkdir, waitpid, system, exec, kill, getpgrp, setpgrp, getpriority, setpriority, sleep */
- 0x3870, 0x2f4c, 0x012b, /* substr */
- 0x2f4c, 0x0067, /* vec */
- 0x2e5c, 0x3378, 0x2f4c, 0x3c88, 0x4044, 0x0003, /* rv2av */
+ 0x379c, 0x36b8, 0x27f4, 0x2730, 0x0003, /* backtick */
+ 0x06f5, /* subst */
+ 0x10dc, 0x2118, 0x0914, 0x3f4c, 0x24a8, 0x01e4, 0x0141, /* trans, transr */
+ 0x0f1c, 0x0618, 0x0067, /* sassign */
+ 0x0bd8, 0x0ad4, 0x09d0, 0x302c, 0x06e8, 0x0067, /* aassign */
+ 0x4570, 0x0003, /* chomp, schomp, ncomplement, scomplement, sin, cos, exp, log, sqrt, int, hex, oct, abs, ord, chr, chroot, rmdir */
+ 0x06f4, 0x302c, 0x0003, /* pos */
+ 0x4570, 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 */
+ 0x1498, 0x0067, /* repeat */
+ 0x3218, 0x4570, 0x0067, /* concat */
+ 0x2f3c, 0x0358, 0x1b94, 0x4570, 0x42ac, 0x0003, /* multiconcat */
+ 0x4570, 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, 0x4570, 0x0003, /* length */
+ 0x39f0, 0x302c, 0x012b, /* substr */
+ 0x302c, 0x0067, /* vec */
+ 0x3198, 0x06f4, 0x4570, 0x018f, /* index, rindex */
+ 0x2f3c, 0x35b8, 0x06f4, 0x302c, 0x3e08, 0x41c4, 0x0003, /* rv2av */
0x025f, /* aelemfast, aelemfast_lex */
- 0x2e5c, 0x2d58, 0x03d6, 0x2f4c, 0x0067, /* aelem, helem */
- 0x2e5c, 0x2f4c, 0x3c89, /* aslice, hslice */
- 0x2f4d, /* kvaslice, kvhslice */
- 0x2e5c, 0x3bd8, 0x2a74, 0x0003, /* delete */
- 0x4138, 0x0003, /* exists */
- 0x2e5c, 0x3378, 0x0614, 0x06b0, 0x2f4c, 0x3c88, 0x4044, 0x29c1, /* rv2hv */
- 0x2e5c, 0x2d58, 0x1074, 0x19d0, 0x2f4c, 0x4044, 0x0003, /* multideref */
- 0x2e5c, 0x3378, 0x0350, 0x2b6c, 0x2489, /* split */
- 0x2e5c, 0x20f9, /* list */
- 0x3eb8, 0x3614, 0x1310, 0x27ac, 0x3968, 0x28a4, 0x32e1, /* sort */
- 0x27ac, 0x0003, /* reverse */
- 0x2bf8, 0x0003, /* flip, flop */
- 0x2e5c, 0x0003, /* cond_expr */
- 0x2e5c, 0x0ef8, 0x03d6, 0x028c, 0x4208, 0x4044, 0x2561, /* entersub */
- 0x36d8, 0x0003, /* leavesub, leavesublv, leavewrite, leaveeval */
+ 0x2f3c, 0x2e38, 0x03d6, 0x302c, 0x0067, /* aelem, helem */
+ 0x2f3c, 0x302c, 0x3e09, /* aslice, hslice */
+ 0x302d, /* kvaslice, kvhslice */
+ 0x2f3c, 0x3d58, 0x2b54, 0x0003, /* delete */
+ 0x43f8, 0x0003, /* exists */
+ 0x2f3c, 0x35b8, 0x06f4, 0x0790, 0x302c, 0x3e08, 0x41c4, 0x2aa1, /* rv2hv */
+ 0x2f3c, 0x2e38, 0x1154, 0x1ab0, 0x302c, 0x41c4, 0x0003, /* multideref */
+ 0x2f3c, 0x35b8, 0x0430, 0x2c4c, 0x2569, /* split */
+ 0x2f3c, 0x21d9, /* list */
+ 0x46dc, 0x4038, 0x13f0, 0x288c, 0x3ae8, 0x2984, 0x3521, /* sort */
+ 0x288c, 0x0003, /* reverse */
+ 0x06f4, 0x0003, /* grepwhile */
+ 0x2cd8, 0x0003, /* flip, flop */
+ 0x2f3c, 0x0003, /* cond_expr */
+ 0x2f3c, 0x0fd8, 0x03d6, 0x028c, 0x44c8, 0x41c4, 0x2641, /* entersub */
+ 0x3858, 0x0003, /* leavesub, leavesublv, leavewrite, leaveeval */
0x02aa, 0x0003, /* argelem */
0x00bc, 0x018f, /* caller */
- 0x22d5, /* nextstate, dbstate */
- 0x2cfc, 0x36d9, /* leave */
- 0x2e5c, 0x3378, 0x0f6c, 0x39e5, /* enteriter */
- 0x39e5, /* iter */
- 0x2cfc, 0x0067, /* leaveloop */
- 0x441c, 0x0003, /* last, next, redo, dump, goto */
- 0x355c, 0x3478, 0x2714, 0x2650, 0x018f, /* open */
- 0x1c70, 0x1ecc, 0x1d88, 0x1b44, 0x0003, /* ftrread, ftrwrite, ftrexec, fteread, ftewrite, fteexec */
- 0x1c70, 0x1ecc, 0x1d88, 0x0003, /* ftis, ftsize, ftmtime, ftatime, ftctime, ftrowned, fteowned, ftzero, ftsock, ftchr, ftblk, ftfile, ftdir, ftpipe, ftsuid, ftsgid, ftsvtx, ftlink, fttty, fttext, ftbinary */
- 0x42b1, /* wait, getppid, time */
- 0x3774, 0x0d10, 0x076c, 0x4388, 0x21e4, 0x0003, /* entereval */
- 0x301c, 0x0018, 0x1224, 0x1141, /* coreargs */
- 0x2f4c, 0x00c7, /* avhvswitch */
- 0x2e5c, 0x01fb, /* padrange */
- 0x2e5c, 0x3f98, 0x04f6, 0x292c, 0x1828, 0x0067, /* refassign */
- 0x2e5c, 0x3f98, 0x04f6, 0x292c, 0x1828, 0x0003, /* lvref */
- 0x2e5d, /* lvrefslice */
- 0x2e5c, 0x3f98, 0x0003, /* lvavref */
+ 0x23b5, /* nextstate, dbstate */
+ 0x2ddc, 0x3859, /* leave */
+ 0x2f3c, 0x35b8, 0x104c, 0x3b65, /* enteriter */
+ 0x3b65, /* iter */
+ 0x2ddc, 0x0067, /* leaveloop */
+ 0x47fc, 0x0003, /* last, next, redo, dump, goto */
+ 0x379c, 0x36b8, 0x27f4, 0x2730, 0x018f, /* open */
+ 0x1d50, 0x1fac, 0x1e68, 0x1c24, 0x0003, /* ftrread, ftrwrite, ftrexec, fteread, ftewrite, fteexec */
+ 0x1d50, 0x1fac, 0x1e68, 0x0003, /* ftis, ftsize, ftmtime, ftatime, ftctime, ftrowned, fteowned, ftzero, ftsock, ftchr, ftblk, ftfile, ftdir, ftpipe, ftsuid, ftsgid, ftsvtx, ftlink, fttty, fttext, ftbinary */
+ 0x4571, /* wait, getppid, time */
+ 0x38f4, 0x0df0, 0x084c, 0x4648, 0x22c4, 0x0003, /* entereval */
+ 0x30fc, 0x0018, 0x1304, 0x1221, /* coreargs */
+ 0x302c, 0x00c7, /* avhvswitch */
+ 0x2f3c, 0x01fb, /* padrange */
+ 0x2f3c, 0x4118, 0x04f6, 0x2a0c, 0x1908, 0x0067, /* refassign */
+ 0x2f3c, 0x4118, 0x04f6, 0x2a0c, 0x1908, 0x0003, /* lvref */
+ 0x2f3d, /* lvrefslice */
+ 0x2f3c, 0x4118, 0x0003, /* lvavref */
};
/* GV */ (OPpEARLY_CV),
/* GELEM */ (OPpARG2_MASK),
/* PADSV */ (OPpDEREF|OPpPAD_STATE|OPpLVAL_INTRO),
- /* PADAV */ (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpPAD_STATE|OPpLVAL_INTRO),
+ /* PADAV */ (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpTRUEBOOL|OPpPAD_STATE|OPpLVAL_INTRO),
/* PADHV */ (OPpPADHV_ISKEYS|OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpMAYBE_TRUEBOOL|OPpTRUEBOOL|OPpPAD_STATE|OPpLVAL_INTRO),
/* PADANY */ (0),
/* RV2GV */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpDONT_INIT_GV|OPpMAYBE_LVSUB|OPpDEREF|OPpALLOW_FAKE|OPpLVAL_INTRO),
/* REGCOMP */ (OPpARG1_MASK),
/* MATCH */ (0),
/* QR */ (0),
- /* SUBST */ (0),
+ /* SUBST */ (OPpTRUEBOOL),
/* SUBSTCONT */ (OPpARG1_MASK),
/* TRANS */ (OPpTRANS_FROM_UTF|OPpTRANS_TO_UTF|OPpTRANS_IDENTICAL|OPpTRANS_SQUASH|OPpTRANS_COMPLEMENT|OPpTRANS_GROWS|OPpTRANS_DELETE),
/* TRANSR */ (OPpTRANS_FROM_UTF|OPpTRANS_TO_UTF|OPpTRANS_IDENTICAL|OPpTRANS_SQUASH|OPpTRANS_COMPLEMENT|OPpTRANS_GROWS|OPpTRANS_DELETE),
/* SASSIGN */ (OPpARG2_MASK|OPpASSIGN_BACKWARDS|OPpASSIGN_CV_TO_GV),
- /* AASSIGN */ (OPpARG2_MASK|OPpMAYBE_LVSUB|OPpASSIGN_COMMON_AGG|OPpASSIGN_COMMON_RC1|OPpASSIGN_COMMON_SCALAR),
+ /* AASSIGN */ (OPpARG2_MASK|OPpASSIGN_TRUEBOOL|OPpMAYBE_LVSUB|OPpASSIGN_COMMON_AGG|OPpASSIGN_COMMON_RC1|OPpASSIGN_COMMON_SCALAR),
/* CHOP */ (OPpARG1_MASK),
/* SCHOP */ (OPpARG1_MASK),
/* CHOMP */ (OPpARG1_MASK|OPpTARGET_MY),
/* DEFINED */ (OPpARG1_MASK),
/* UNDEF */ (OPpARG1_MASK),
/* STUDY */ (OPpARG1_MASK),
- /* POS */ (OPpARG1_MASK|OPpMAYBE_LVSUB),
+ /* POS */ (OPpARG1_MASK|OPpMAYBE_LVSUB|OPpTRUEBOOL),
/* PREINC */ (OPpARG1_MASK),
/* I_PREINC */ (OPpARG1_MASK),
/* PREDEC */ (OPpARG1_MASK),
/* 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),
/* RIGHT_SHIFT */ (OPpARG2_MASK|OPpTARGET_MY),
/* HEX */ (OPpARG1_MASK|OPpTARGET_MY),
/* OCT */ (OPpARG1_MASK|OPpTARGET_MY),
/* ABS */ (OPpARG1_MASK|OPpTARGET_MY),
- /* LENGTH */ (OPpARG1_MASK|OPpTARGET_MY),
+ /* LENGTH */ (OPpARG1_MASK|OPpTARGET_MY|OPpTRUEBOOL),
/* SUBSTR */ (OPpARG3_MASK|OPpMAYBE_LVSUB|OPpSUBSTR_REPL_FIRST),
/* VEC */ (OPpARG2_MASK|OPpMAYBE_LVSUB),
- /* INDEX */ (OPpARG4_MASK|OPpTARGET_MY),
- /* RINDEX */ (OPpARG4_MASK|OPpTARGET_MY),
+ /* INDEX */ (OPpARG4_MASK|OPpTARGET_MY|OPpTRUEBOOL|OPpINDEX_BOOLNEG),
+ /* RINDEX */ (OPpARG4_MASK|OPpTARGET_MY|OPpTRUEBOOL|OPpINDEX_BOOLNEG),
/* SPRINTF */ (OPpARG4_MASK),
/* FORMLINE */ (OPpARG4_MASK),
/* ORD */ (OPpARG1_MASK|OPpTARGET_MY),
/* UC */ (OPpARG1_MASK),
/* LC */ (OPpARG1_MASK),
/* QUOTEMETA */ (OPpARG1_MASK),
- /* RV2AV */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpOUR_INTRO|OPpLVAL_INTRO),
+ /* RV2AV */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpTRUEBOOL|OPpOUR_INTRO|OPpLVAL_INTRO),
/* AELEMFAST */ (255),
/* AELEMFAST_LEX */ (255),
/* AELEM */ (OPpARG2_MASK|OPpMAYBE_LVSUB|OPpDEREF|OPpLVAL_DEFER|OPpLVAL_INTRO),
/* POP */ (OPpARG1_MASK),
/* SHIFT */ (OPpARG1_MASK),
/* UNSHIFT */ (OPpARG4_MASK|OPpTARGET_MY),
- /* SORT */ (OPpSORT_NUMERIC|OPpSORT_INTEGER|OPpSORT_REVERSE|OPpSORT_INPLACE|OPpSORT_DESCEND|OPpSORT_QSORT|OPpSORT_STABLE),
+ /* SORT */ (OPpSORT_NUMERIC|OPpSORT_INTEGER|OPpSORT_REVERSE|OPpSORT_INPLACE|OPpSORT_DESCEND|OPpSORT_STABLE|OPpSORT_UNSTABLE),
/* REVERSE */ (OPpARG1_MASK|OPpREVERSE_INPLACE),
/* GREPSTART */ (OPpARG1_MASK),
- /* GREPWHILE */ (OPpARG1_MASK),
+ /* GREPWHILE */ (OPpARG1_MASK|OPpTRUEBOOL),
/* MAPSTART */ (OPpARG1_MASK),
/* MAPWHILE */ (OPpARG1_MASK),
/* RANGE */ (OPpARG1_MASK),
/* ANDASSIGN */ (OPpARG1_MASK),
/* ORASSIGN */ (OPpARG1_MASK),
/* DORASSIGN */ (OPpARG1_MASK),
- /* METHOD */ (OPpARG1_MASK),
/* ENTERSUB */ (OPpENTERSUB_INARGS|OPpHINT_STRICT_REFS|OPpENTERSUB_HASTARG|OPpENTERSUB_AMPER|OPpDEREF|OPpENTERSUB_DB|OPpLVAL_INTRO),
/* LEAVESUB */ (OPpARG1_MASK|OPpREFCOUNTED),
/* LEAVESUBLV */ (OPpARG1_MASK|OPpREFCOUNTED),
/* DUMP */ (OPpARG1_MASK|OPpPV_IS_UTF8),
/* GOTO */ (OPpARG1_MASK|OPpPV_IS_UTF8),
/* EXIT */ (OPpARG4_MASK),
+ /* METHOD */ (OPpARG1_MASK),
/* METHOD_NAMED */ (OPpARG1_MASK),
/* METHOD_SUPER */ (OPpARG1_MASK),
/* METHOD_REDIR */ (OPpARG1_MASK),