Remove 3 unused interpreter variables

[perl5.git] / opcode.h

diff --git a/opcode.h b/opcode.h
index 0d28351..540dc0b 100644 (file)
--- a/opcode.h
+++ b/opcode.h
@@ -522,6 +522,9 @@ EXTCONST char* const PL_op_name[] = {
        "runcv",
        "fc",
        "padcv",
+       "introcv",
+       "clonecv",
+       "padrange",
        "freed",
 };
 #endif
@@ -904,6 +907,9 @@ EXTCONST char* const PL_op_desc[] = {
        "__SUB__",
        "fc",
        "private subroutine",
+       "private subroutine",
+       "private subroutine",
+       "list of private variables",
        "freed op",
 };
 #endif
@@ -1300,6 +1306,9 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        Perl_pp_runcv,
        Perl_pp_fc,
        Perl_pp_padcv,
+       Perl_pp_introcv,
+       Perl_pp_clonecv,
+       Perl_pp_padrange,
 }
 #endif
 #ifdef PERL_PPADDR_INITED
@@ -1692,6 +1701,9 @@ EXT Perl_check_t PL_check[] /* or perlvars.h */
        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
@@ -2078,6 +2090,9 @@ EXTCONST U32 PL_opargs[] = {
        0x00000004,     /* runcv */
        0x00009b8e,     /* fc */
        0x00000040,     /* padcv */
+       0x00000040,     /* introcv */
+       0x00000040,     /* clonecv */
+       0x00000040,     /* padrange */
 };
 #endif