Revert 20233 + s/GvAVn/GvAV/) + rerun 'perl bytecode.pl'.

(from Enache)

p4raw-id: //depot/perl@20246

diff --git a/bytecode.pl b/bytecode.pl
index 1f30d9b..d4b40fb 100644 (file)
--- a/bytecode.pl
+++ b/bytecode.pl
@@ -486,7 +486,7 @@ push_end    PL_endav                                svindex         x
 curstash       *(SV**)&PL_curstash                     svindex
 defstash       *(SV**)&PL_defstash                     svindex
 data           none                                    U8              x
-incav          *(SV**)&PL_incgv                        svindex
+incav          *(SV**)&GvAV(PL_incgv)                  svindex
 load_glob      none                                    svindex         x
 #ifdef USE_ITHREADS
 regex_padav    *(SV**)&PL_regex_padav                  svindex

diff --git a/ext/ByteLoader/byterun.c b/ext/ByteLoader/byterun.c
index b29549e..636c206 100644 (file)
--- a/ext/ByteLoader/byterun.c
+++ b/ext/ByteLoader/byterun.c
@@ -1067,7 +1067,7 @@ byterun(pTHX_ register struct byteloader_state *bstate)
            {
                svindex arg;
                BGET_svindex(arg);
-               *(SV**)&PL_incgv = arg;
+               *(SV**)&GvAV(PL_incgv) = arg;
                break;
            }
          case INSN_LOAD_GLOB:          /* 144 */