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
Update IO-Compress to CPAN version 2.044
[perl5.git]
/
opcode.h
diff --git
a/opcode.h
b/opcode.h
index
a1b9d2e
..
d747d9a
100644
(file)
--- a/
opcode.h
+++ b/
opcode.h
@@
-520,6
+520,7
@@
EXTCONST char* const PL_op_name[] = {
"rkeys",
"rvalues",
"coreargs",
"rkeys",
"rvalues",
"coreargs",
+ "runcv",
};
#endif
};
#endif
@@
-899,6
+900,7
@@
EXTCONST char* const PL_op_desc[] = {
"keys on reference",
"values on reference",
"CORE:: subroutine",
"keys on reference",
"values on reference",
"CORE:: subroutine",
+ "__SUB__",
};
#endif
};
#endif
@@
-1292,6
+1294,7
@@
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,
}
#endif
#ifdef PERL_PPADDR_INITED
}
#endif
#ifdef PERL_PPADDR_INITED
@@
-1682,6
+1685,7
@@
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 */
}
#endif
#ifdef PERL_CHECK_INITED
}
#endif
#ifdef PERL_CHECK_INITED
@@
-2066,6
+2070,7
@@
EXTCONST U32 PL_opargs[] = {
0x00001b08, /* rkeys */
0x00001b08, /* rvalues */
0x00000600, /* coreargs */
0x00001b08, /* rkeys */
0x00001b08, /* rvalues */
0x00000600, /* coreargs */
+ 0x00000004, /* runcv */
};
#endif
};
#endif