diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-08 22:59:01 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-08 22:59:01 +0000 |
commit | d22779f5bc9230e35caedc48714cf84a936fc040 (patch) | |
tree | c34ab2135b4bb633a78d2a3dd56975444638cbe8 /toke.c | |
parent | ae21ab7a583996be9282ef39a5a1bcfa2a228633 (diff) | |
download | perl-d22779f5bc9230e35caedc48714cf84a936fc040.tar.gz |
Retract #11212.
p4raw-id: //depot/perl@11223
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 1 |
1 files changed, 0 insertions, 1 deletions
@@ -7444,7 +7444,6 @@ Perl_start_subparse(pTHX_ I32 is_format, U32 flags) PL_compcv = (CV*)NEWSV(1104,0); sv_upgrade((SV *)PL_compcv, is_format ? SVt_PVFM : SVt_PVCV); CvFLAGS(PL_compcv) |= flags; - CvDEFSTASH(PL_compcv) = PL_defstash; PL_comppad = newAV(); av_push(PL_comppad, Nullsv); |