This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'release-5.21.2' into blead
[perl5.git]
/
opcode.h
diff --git
a/opcode.h
b/opcode.h
index
a1b9d2e
..
fbc3fe1
100644
(file)
--- a/
opcode.h
+++ b/
opcode.h
@@
-280,6
+280,7
@@
EXTCONST char* const PL_op_name[] = {
"aelemfast_lex",
"aelem",
"aslice",
"aelemfast_lex",
"aelem",
"aslice",
+ "kvaslice",
"aeach",
"akeys",
"avalues",
"aeach",
"akeys",
"avalues",
@@
-291,7
+292,7
@@
EXTCONST char* const PL_op_name[] = {
"rv2hv",
"helem",
"hslice",
"rv2hv",
"helem",
"hslice",
- "
boolkeys
",
+ "
kvhslice
",
"unpack",
"pack",
"split",
"unpack",
"pack",
"split",
@@
-520,6
+521,13
@@
EXTCONST char* const PL_op_name[] = {
"rkeys",
"rvalues",
"coreargs",
"rkeys",
"rvalues",
"coreargs",
+ "runcv",
+ "fc",
+ "padcv",
+ "introcv",
+ "clonecv",
+ "padrange",
+ "freed",
};
#endif
};
#endif
@@
-659,6
+667,7
@@
EXTCONST char* const PL_op_desc[] = {
"constant lexical array element",
"array element",
"array slice",
"constant lexical array element",
"array element",
"array slice",
+ "index/value array slice",
"each on array",
"keys on array",
"values on array",
"each on array",
"keys on array",
"values on array",
@@
-670,7
+679,7
@@
EXTCONST char* const PL_op_desc[] = {
"hash dereference",
"hash element",
"hash slice",
"hash dereference",
"hash element",
"hash slice",
- "
boolkeys
",
+ "
key/value hash slice
",
"unpack",
"pack",
"split",
"unpack",
"pack",
"split",
@@
-899,6
+908,13
@@
EXTCONST char* const PL_op_desc[] = {
"keys on reference",
"values on reference",
"CORE:: subroutine",
"keys on reference",
"values on reference",
"CORE:: subroutine",
+ "__SUB__",
+ "fc",
+ "private subroutine",
+ "private subroutine",
+ "private subroutine",
+ "list of private variables",
+ "freed op",
};
#endif
};
#endif
@@
-1052,6
+1068,7
@@
EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
Perl_pp_aelemfast_lex, /* implemented by Perl_pp_aelemfast */
Perl_pp_aelem,
Perl_pp_aslice,
Perl_pp_aelemfast_lex, /* implemented by Perl_pp_aelemfast */
Perl_pp_aelem,
Perl_pp_aslice,
+ Perl_pp_kvaslice,
Perl_pp_aeach,
Perl_pp_akeys,
Perl_pp_avalues, /* implemented by Perl_pp_akeys */
Perl_pp_aeach,
Perl_pp_akeys,
Perl_pp_avalues, /* implemented by Perl_pp_akeys */
@@
-1063,7
+1080,7
@@
EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
Perl_pp_rv2hv, /* implemented by Perl_pp_rv2av */
Perl_pp_helem,
Perl_pp_hslice,
Perl_pp_rv2hv, /* implemented by Perl_pp_rv2av */
Perl_pp_helem,
Perl_pp_hslice,
- Perl_pp_
boolkeys
,
+ Perl_pp_
kvhslice
,
Perl_pp_unpack,
Perl_pp_pack,
Perl_pp_split,
Perl_pp_unpack,
Perl_pp_pack,
Perl_pp_split,
@@
-1292,6
+1309,12
@@
EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
Perl_pp_rkeys,
Perl_pp_rvalues, /* implemented by Perl_pp_rkeys */
Perl_pp_coreargs,
Perl_pp_rkeys,
Perl_pp_rvalues, /* implemented by Perl_pp_rkeys */
Perl_pp_coreargs,
+ Perl_pp_runcv,
+ Perl_pp_fc,
+ Perl_pp_padcv,
+ Perl_pp_introcv,
+ Perl_pp_clonecv,
+ Perl_pp_padrange,
}
#endif
#ifdef PERL_PPADDR_INITED
}
#endif
#ifdef PERL_PPADDR_INITED
@@
-1334,7
+1357,7
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_null, /* srefgen */
Perl_ck_fun, /* ref */
Perl_ck_fun, /* bless */
Perl_ck_null, /* srefgen */
Perl_ck_fun, /* ref */
Perl_ck_fun, /* bless */
- Perl_ck_
open,
/* backtick */
+ Perl_ck_
backtick,
/* backtick */
Perl_ck_glob, /* glob */
Perl_ck_readline, /* readline */
Perl_ck_null, /* rcatline */
Perl_ck_glob, /* glob */
Perl_ck_readline, /* readline */
Perl_ck_null, /* rcatline */
@@
-1354,9
+1377,9
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_spair, /* chomp */
Perl_ck_null, /* schomp */
Perl_ck_defined, /* defined */
Perl_ck_spair, /* chomp */
Perl_ck_null, /* schomp */
Perl_ck_defined, /* defined */
- Perl_ck_
lfun,
/* undef */
+ Perl_ck_
fun,
/* undef */
Perl_ck_fun, /* study */
Perl_ck_fun, /* study */
- Perl_ck_
lfun,
/* pos */
+ Perl_ck_
fun,
/* pos */
Perl_ck_lfun, /* preinc */
Perl_ck_lfun, /* i_preinc */
Perl_ck_lfun, /* predec */
Perl_ck_lfun, /* preinc */
Perl_ck_lfun, /* i_preinc */
Perl_ck_lfun, /* predec */
@@
-1427,7
+1450,7
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_fun, /* vec */
Perl_ck_index, /* index */
Perl_ck_index, /* rindex */
Perl_ck_fun, /* vec */
Perl_ck_index, /* index */
Perl_ck_index, /* rindex */
- Perl_ck_
fun,
/* sprintf */
+ Perl_ck_
lfun,
/* sprintf */
Perl_ck_fun, /* formline */
Perl_ck_fun, /* ord */
Perl_ck_fun, /* chr */
Perl_ck_fun, /* formline */
Perl_ck_fun, /* ord */
Perl_ck_fun, /* chr */
@@
-1442,6
+1465,7
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_null, /* aelemfast_lex */
Perl_ck_null, /* aelem */
Perl_ck_null, /* aslice */
Perl_ck_null, /* aelemfast_lex */
Perl_ck_null, /* aelem */
Perl_ck_null, /* aslice */
+ Perl_ck_null, /* kvaslice */
Perl_ck_each, /* aeach */
Perl_ck_each, /* akeys */
Perl_ck_each, /* avalues */
Perl_ck_each, /* aeach */
Perl_ck_each, /* akeys */
Perl_ck_each, /* avalues */
@@
-1453,7
+1477,7
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_rvconst, /* rv2hv */
Perl_ck_null, /* helem */
Perl_ck_null, /* hslice */
Perl_ck_rvconst, /* rv2hv */
Perl_ck_null, /* helem */
Perl_ck_null, /* hslice */
- Perl_ck_
fun, /* boolkeys
*/
+ Perl_ck_
null, /* kvhslice
*/
Perl_ck_fun, /* unpack */
Perl_ck_fun, /* pack */
Perl_ck_split, /* split */
Perl_ck_fun, /* unpack */
Perl_ck_fun, /* pack */
Perl_ck_split, /* split */
@@
-1490,7
+1514,7
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_null, /* leavesublv */
Perl_ck_fun, /* caller */
Perl_ck_fun, /* warn */
Perl_ck_null, /* leavesublv */
Perl_ck_fun, /* caller */
Perl_ck_fun, /* warn */
- Perl_ck_
die
, /* die */
+ Perl_ck_
fun
, /* die */
Perl_ck_fun, /* reset */
Perl_ck_null, /* lineseq */
Perl_ck_null, /* nextstate */
Perl_ck_fun, /* reset */
Perl_ck_null, /* lineseq */
Perl_ck_null, /* nextstate */
@@
-1509,7
+1533,7
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_null, /* redo */
Perl_ck_null, /* dump */
Perl_ck_null, /* goto */
Perl_ck_null, /* redo */
Perl_ck_null, /* dump */
Perl_ck_null, /* goto */
- Perl_ck_
exit,
/* exit */
+ Perl_ck_
fun,
/* exit */
Perl_ck_null, /* method_named */
Perl_ck_null, /* entergiven */
Perl_ck_null, /* leavegiven */
Perl_ck_null, /* method_named */
Perl_ck_null, /* entergiven */
Perl_ck_null, /* leavegiven */
@@
-1542,8
+1566,8
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_fun, /* sysread */
Perl_ck_fun, /* syswrite */
Perl_ck_eof, /* eof */
Perl_ck_fun, /* sysread */
Perl_ck_fun, /* syswrite */
Perl_ck_eof, /* eof */
- Perl_ck_
fun,
/* tell */
- Perl_ck_
fun,
/* seek */
+ Perl_ck_
tell,
/* tell */
+ Perl_ck_
tell,
/* seek */
Perl_ck_trunc, /* truncate */
Perl_ck_fun, /* fcntl */
Perl_ck_fun, /* ioctl */
Perl_ck_trunc, /* truncate */
Perl_ck_fun, /* fcntl */
Perl_ck_fun, /* ioctl */
@@
-1590,7
+1614,7
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_ftst, /* fttty */
Perl_ck_ftst, /* fttext */
Perl_ck_ftst, /* ftbinary */
Perl_ck_ftst, /* fttty */
Perl_ck_ftst, /* fttext */
Perl_ck_ftst, /* ftbinary */
- Perl_ck_
chdir
, /* chdir */
+ Perl_ck_
trunc
, /* chdir */
Perl_ck_fun, /* chown */
Perl_ck_fun, /* chroot */
Perl_ck_fun, /* unlink */
Perl_ck_fun, /* chown */
Perl_ck_fun, /* chroot */
Perl_ck_fun, /* unlink */
@@
-1682,6
+1706,12
@@
EXT Perl_check_t PL_check[] /* or perlvars.h */
Perl_ck_each, /* rkeys */
Perl_ck_each, /* rvalues */
Perl_ck_null, /* coreargs */
Perl_ck_each, /* rkeys */
Perl_ck_each, /* rvalues */
Perl_ck_null, /* coreargs */
+ Perl_ck_null, /* runcv */
+ Perl_ck_fun, /* fc */
+ Perl_ck_null, /* padcv */
+ Perl_ck_null, /* introcv */
+ Perl_ck_null, /* clonecv */
+ Perl_ck_null, /* padrange */
}
#endif
#ifdef PERL_CHECK_INITED
}
#endif
#ifdef PERL_CHECK_INITED
@@
-1738,9
+1768,9
@@
EXTCONST U32 PL_opargs[] = {
0x00002b1d, /* chomp */
0x00009b9c, /* schomp */
0x00009b84, /* defined */
0x00002b1d, /* chomp */
0x00009b9c, /* schomp */
0x00009b84, /* defined */
- 0x0000
9
b04, /* undef */
+ 0x0000
f
b04, /* undef */
0x00009b84, /* study */
0x00009b84, /* study */
- 0x0000
9
b8c, /* pos */
+ 0x0000
f
b8c, /* pos */
0x00001164, /* preinc */
0x00001144, /* i_preinc */
0x00001164, /* predec */
0x00001164, /* preinc */
0x00001144, /* i_preinc */
0x00001164, /* predec */
@@
-1756,7
+1786,7
@@
EXTCONST U32 PL_opargs[] = {
0x0001121e, /* i_divide */
0x0001123e, /* modulo */
0x0001121e, /* i_modulo */
0x0001121e, /* i_divide */
0x0001123e, /* modulo */
0x0001121e, /* i_modulo */
- 0x0001220
9
, /* repeat */
+ 0x0001220
b
, /* repeat */
0x0001123e, /* add */
0x0001121e, /* i_add */
0x0001123e, /* subtract */
0x0001123e, /* add */
0x0001121e, /* i_add */
0x0001123e, /* subtract */
@@
-1826,6
+1856,7
@@
EXTCONST U32 PL_opargs[] = {
0x00013040, /* aelemfast_lex */
0x00013204, /* aelem */
0x00023401, /* aslice */
0x00013040, /* aelemfast_lex */
0x00013204, /* aelem */
0x00023401, /* aslice */
+ 0x00023401, /* kvaslice */
0x00003b00, /* aeach */
0x00003b08, /* akeys */
0x00003b08, /* avalues */
0x00003b00, /* aeach */
0x00003b08, /* akeys */
0x00003b08, /* avalues */
@@
-1834,12
+1865,12
@@
EXTCONST U32 PL_opargs[] = {
0x00004b08, /* keys */
0x00001b00, /* delete */
0x00001b04, /* exists */
0x00004b08, /* keys */
0x00001b00, /* delete */
0x00001b04, /* exists */
- 0x0000014
8
, /* rv2hv */
+ 0x0000014
0
, /* rv2hv */
0x00014204, /* helem */
0x00024401, /* hslice */
0x00014204, /* helem */
0x00024401, /* hslice */
- 0x000
04b00, /* boolkeys
*/
+ 0x000
24401, /* kvhslice
*/
0x00091480, /* unpack */
0x00091480, /* unpack */
- 0x0002140
d
, /* pack */
+ 0x0002140
f
, /* pack */
0x00111408, /* split */
0x0002140d, /* join */
0x00002401, /* list */
0x00111408, /* split */
0x0002140d, /* join */
0x00002401, /* list */
@@
-2066,6
+2097,12
@@
EXTCONST U32 PL_opargs[] = {
0x00001b08, /* rkeys */
0x00001b08, /* rvalues */
0x00000600, /* coreargs */
0x00001b08, /* rkeys */
0x00001b08, /* rvalues */
0x00000600, /* coreargs */
+ 0x00000004, /* runcv */
+ 0x00009b8e, /* fc */
+ 0x00000040, /* padcv */
+ 0x00000040, /* introcv */
+ 0x00000040, /* clonecv */
+ 0x00000040, /* padrange */
};
#endif
};
#endif