Remove 3 unused interpreter variables

[perl5.git] / opcode.h

diff --git a/opcode.h b/opcode.h
index be5bc03..540dc0b 100644 (file)
--- a/opcode.h
+++ b/opcode.h
@@ -523,6 +523,8 @@ EXTCONST char* const PL_op_name[] = {
        "fc",
        "padcv",
        "introcv",
+       "clonecv",
+       "padrange",
        "freed",
 };
 #endif
@@ -906,6 +908,8 @@ EXTCONST char* const PL_op_desc[] = {
        "fc",
        "private subroutine",
        "private subroutine",
+       "private subroutine",
+       "list of private variables",
        "freed op",
 };
 #endif
@@ -1303,6 +1307,8 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        Perl_pp_fc,
        Perl_pp_padcv,
        Perl_pp_introcv,
+       Perl_pp_clonecv,
+       Perl_pp_padrange,
 }
 #endif
 #ifdef PERL_PPADDR_INITED
@@ -1696,6 +1702,8 @@ EXT Perl_check_t PL_check[] /* or perlvars.h */
        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
@@ -2083,6 +2091,8 @@ EXTCONST U32 PL_opargs[] = {
        0x00009b8e,     /* fc */
        0x00000040,     /* padcv */
        0x00000040,     /* introcv */
+       0x00000040,     /* clonecv */
+       0x00000040,     /* padrange */
 };
 #endif