summaryrefslogtreecommitdiff
path: root/ext/ByteLoader/byterun.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2005-04-19 20:07:49 +0000
committerNicholas Clark <nick@ccl4.org>2005-04-19 20:07:49 +0000
commit62703e7218aceb3f5d30f70a2307dd02e5eb8c63 (patch)
tree13f0830b3ad56b67739da5155d1f69020c98aee5 /ext/ByteLoader/byterun.c
parentbd7d4f4d586a396d1b104a293cce339c8d63ce5a (diff)
downloadperl-62703e7218aceb3f5d30f70a2307dd02e5eb8c63.tar.gz
Force RVALUE macros when in PERL_DEBUG_COW
p4raw-id: //depot/perl@24252
Diffstat (limited to 'ext/ByteLoader/byterun.c')
-rw-r--r--ext/ByteLoader/byterun.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/ByteLoader/byterun.c b/ext/ByteLoader/byterun.c
index fd506b1430..0eaca4588a 100644
--- a/ext/ByteLoader/byterun.c
+++ b/ext/ByteLoader/byterun.c
@@ -592,7 +592,7 @@ byterun(pTHX_ register struct byteloader_state *bstate)
{
svindex arg;
BGET_svindex(arg);
- *(SV**)&SvSTASH(bstate->bs_sv) = arg;
+ SvSTASH_set(bstate->bs_sv, arg);
break;
}
case INSN_GV_FETCHPV: /* 77 */