diff options
| author | Chip Salzenberg <chip@perl.com> | 1997-04-25 02:34:21 +1200 |
|---|---|---|
| committer | Chip Salzenberg <chip@atlantic.net> | 1997-05-01 00:00:00 +1200 |
| commit | 1d5db3267290eb95285de2427e6b4f4c072cc986 (patch) | |
| tree | 35daa5a30632b98d6e03c0cd825b296955f0cc22 /op.c | |
| parent | bedebaa5d034917d531c5bc8c9415a048a98bf02 (diff) | |
| download | perl-1d5db3267290eb95285de2427e6b4f4c072cc986.tar.gz | |
Forget prototype of subroutine after C<undef &subr>
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -2930,6 +2930,7 @@ CV *cv; CvROOT(cv) = Nullop; LEAVE; } + SvPOK_off((SV*)cv); /* forget prototype */ CvFLAGS(cv) = 0; SvREFCNT_dec(CvGV(cv)); CvGV(cv) = Nullgv; |