From ac2170572dc0ca66736a1b979605ad983a4909a3 Mon Sep 17 00:00:00 2001
From: Father Chrysostomos <sprout@cpan.org>
Date: Sat, 30 Jun 2012 22:29:28 -0700
Subject: padcv op type

---
 opcode.h | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'opcode.h')

diff --git a/opcode.h b/opcode.h
index aeee45c113..0d28351789 100644
--- a/opcode.h
+++ b/opcode.h
@@ -521,6 +521,7 @@ EXTCONST char* const PL_op_name[] = {
 	"coreargs",
 	"runcv",
 	"fc",
+	"padcv",
 	"freed",
 };
 #endif
@@ -902,6 +903,7 @@ EXTCONST char* const PL_op_desc[] = {
 	"CORE:: subroutine",
 	"__SUB__",
 	"fc",
+	"private subroutine",
 	"freed op",
 };
 #endif
@@ -1297,6 +1299,7 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
 	Perl_pp_coreargs,
 	Perl_pp_runcv,
 	Perl_pp_fc,
+	Perl_pp_padcv,
 }
 #endif
 #ifdef PERL_PPADDR_INITED
@@ -1688,6 +1691,7 @@ EXT Perl_check_t PL_check[] /* or perlvars.h */
 	Perl_ck_null,		/* coreargs */
 	Perl_ck_null,		/* runcv */
 	Perl_ck_fun,		/* fc */
+	Perl_ck_null,		/* padcv */
 }
 #endif
 #ifdef PERL_CHECK_INITED
@@ -2073,6 +2077,7 @@ EXTCONST U32 PL_opargs[] = {
 	0x00000600,	/* coreargs */
 	0x00000004,	/* runcv */
 	0x00009b8e,	/* fc */
+	0x00000040,	/* padcv */
 };
 #endif
 
-- 
cgit v1.2.1