From d22779f5bc9230e35caedc48714cf84a936fc040 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Sun, 8 Jul 2001 22:59:01 +0000 Subject: Retract #11212. p4raw-id: //depot/perl@11223 --- ext/Opcode/Opcode.xs | 1 - 1 file changed, 1 deletion(-) (limited to 'ext/Opcode/Opcode.xs') 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; -- cgit v1.2.1