summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-12-01 03:45:13 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-12-01 03:45:13 +0000
commit638eceb6656bf10acb1a6dc2a55880f5e1a6c8c4 (patch)
tree35c02afc07b97e44b7d4abdf0b4829f850a890a3 /pp_hot.c
parent7766f1371a6d2b58d0f46fbe6a60785860a39c1e (diff)
downloadperl-638eceb6656bf10acb1a6dc2a55880f5e1a6c8c4.tar.gz
minor USE_ITHREADS tweaks
p4raw-id: //depot/perl@4603
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/pp_hot.c b/pp_hot.c
index 690abea86a..8697d36df8 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -58,9 +58,9 @@ PP(pp_gvsv)
djSP;
EXTEND(SP,1);
if (PL_op->op_private & OPpLVAL_INTRO)
- PUSHs(save_scalar(cGVOP));
+ PUSHs(save_scalar(cGVOP_gv));
else
- PUSHs(GvSV(cGVOP));
+ PUSHs(GvSV(cGVOP_gv));
RETURN;
}
@@ -95,7 +95,7 @@ PP(pp_stringify)
PP(pp_gv)
{
djSP;
- XPUSHs((SV*)cGVOP);
+ XPUSHs((SV*)cGVOP_gv);
RETURN;
}
@@ -271,7 +271,7 @@ PP(pp_add)
PP(pp_aelemfast)
{
djSP;
- AV *av = GvAV(cGVOP);
+ AV *av = GvAV(cGVOP_gv);
U32 lval = PL_op->op_flags & OPf_MOD;
SV** svp = av_fetch(av, PL_op->op_private, lval);
SV *sv = (svp ? *svp : &PL_sv_undef);