Regen byterun once more: the incav is not yet right, but at

least it compiles now (Tru64 cc choked on the lvalue cast).

p4raw-id: //depot/perl@20223

diff --git a/bytecode.pl b/bytecode.pl
index e375961..1bcf95a 100644 (file)
--- a/bytecode.pl
+++ b/bytecode.pl
@@ -479,7 +479,7 @@ push_end    PL_endav                                svindex         x
 curstash       *(SV**)&PL_curstash                     svindex
 defstash       *(SV**)&PL_defstash                     svindex
 data           none                                    U8              x
-incav          *(SV**)&GvAVn(PL_incgv)                 svindex
+incav          *(SV**)&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 f2f367e..d820ef8 100644 (file)
--- a/ext/ByteLoader/byterun.c
+++ b/ext/ByteLoader/byterun.c
@@ -1031,7 +1031,7 @@ byterun(pTHX_ register struct byteloader_state *bstate)
            {
                svindex arg;
                BGET_svindex(arg);
-               *(SV**)&GvAVn(PL_incgv) = arg;
+               *(SV**)&PL_incgv = arg;
                break;
            }
          case INSN_LOAD_GLOB:          /* 139 */