diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-07-28 04:26:58 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-07-28 04:26:58 +0000 |
commit | 0ac16f7c8e031d5a1619f0d322af0b1a02906b5d (patch) | |
tree | e3bc23777916f5eab1777e92145eb01b495756c4 | |
parent | 0fa16c34bbe53a7015f0a9ba3310b33d220a2efe (diff) | |
download | perl-0ac16f7c8e031d5a1619f0d322af0b1a02906b5d.tar.gz |
Revert 20233 + s/GvAVn/GvAV/) + rerun 'perl bytecode.pl'.
(from Enache)
p4raw-id: //depot/perl@20246
-rw-r--r-- | bytecode.pl | 2 | ||||
-rw-r--r-- | ext/ByteLoader/byterun.c | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/bytecode.pl b/bytecode.pl index 1f30d9be3b..d4b40fb263 100644 --- 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 b29549e00f..636c206c58 100644 --- 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 */ |