summaryrefslogtreecommitdiff
path: root/ext/Opcode/Opcode.xs
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-07-08 22:59:01 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-07-08 22:59:01 +0000
commitd22779f5bc9230e35caedc48714cf84a936fc040 (patch)
treec34ab2135b4bb633a78d2a3dd56975444638cbe8 /ext/Opcode/Opcode.xs
parentae21ab7a583996be9282ef39a5a1bcfa2a228633 (diff)
downloadperl-d22779f5bc9230e35caedc48714cf84a936fc040.tar.gz
Retract #11212.
p4raw-id: //depot/perl@11223
Diffstat (limited to 'ext/Opcode/Opcode.xs')
-rw-r--r--ext/Opcode/Opcode.xs1
1 files changed, 0 insertions, 1 deletions
diff --git a/ext/Opcode/Opcode.xs b/ext/Opcode/Opcode.xs
index 5f091f8be5..6c583123b3 100644
--- a/ext/Opcode/Opcode.xs
+++ b/ext/Opcode/Opcode.xs
@@ -290,7 +290,6 @@ PPCODE:
GvHV(PL_incgv) = (HV*)SvREFCNT_inc(GvHV(gv_HVadd(gv_fetchpv("INC",TRUE,SVt_PVHV))));
PUSHMARK(SP);
- CvDEFSTASH(SvRV(codesv)) = PL_defstash;
perl_call_sv(codesv, GIMME|G_EVAL|G_KEEPERR); /* use callers context */
SPAGAIN; /* for the PUTBACK added by xsubpp */
LEAVE;