diff options
author | Enache Adrian <enache@rdslink.ro> | 2003-07-05 22:08:07 +0300 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2012-09-20 11:18:02 +0200 |
commit | cec4dc0e420ef6e3b19b0e6f661d2b4fa43b93fa (patch) | |
tree | 99d3cee00fd3b2ca7edc3341a29385b1946c5c4f /perl.c | |
parent | 5f7e30c4a6075995b75f8d337d2b381e5463bce3 (diff) | |
download | perl-cec4dc0e420ef6e3b19b0e6f661d2b4fa43b93fa.tar.gz |
Get rid of PL_formfeed.
$^L is neither a magical variable, nor a normal one (like $;) but
it's just a little bit special :)
This patch removes PL_formfeed - IMHO, an extra gv_fetchpv per page
when using formats isn't going to cause a sensible speed regression.
I suppose that removing the intrpvar.h hunk from the patch is enough
to keep binary compatibility - unless someone used PL_formfeed from
an XS module.
[with regen.pl run as noted by the author, and an additional change to
perl.c to remove the reference to PL_formfeed added soon after this patch
was sent]
Diffstat (limited to 'perl.c')
-rw-r--r-- | perl.c | 1 |
1 files changed, 0 insertions, 1 deletions
@@ -1229,7 +1229,6 @@ perl_destruct(pTHXx) PL_psig_pend = (int*)NULL; Safefree(psig_save); } - PL_formfeed = NULL; nuke_stacks(); PL_tainting = FALSE; PL_taint_warn = FALSE; |