summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorEnache Adrian <enache@rdslink.ro>2003-07-05 22:08:07 +0300
committerNicholas Clark <nick@ccl4.org>2012-09-20 11:18:02 +0200
commitcec4dc0e420ef6e3b19b0e6f661d2b4fa43b93fa (patch)
tree99d3cee00fd3b2ca7edc3341a29385b1946c5c4f /perl.c
parent5f7e30c4a6075995b75f8d337d2b381e5463bce3 (diff)
downloadperl-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.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/perl.c b/perl.c
index 7d65719927..845a70bdfa 100644
--- a/perl.c
+++ b/perl.c
@@ -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;